Оберіть дві складові комп ютерної системи апаратна складова технічна складова мультимедійна - id2144829020200614 от almira666ozs336 14.06.2020 01:58

Question

Информатика: Оберіть дві складові комп ютерної системи апаратна складова технічна складова мультимедійна

almira666ozs336 · Accepted Answer

У меня работа с одним массивом.
Паскаль.
---
uses crt;
const N=4;
M=6;
var a: array [1..n,1..m] of integer;
x,y,k,p: integer;
begin
for x:=1 to n do begin
for y:=1 to m do begin
a[x,y]:=random(21)-10;
write(a[x,y]:4);
end;
writeln;
end;
write('k='); readln(k);
if k<=m then p:=m-1 else p:=m;
for y:=k+1 to m do
for x:=1 to n do
a[x,y-1]:=a[x,y];
for x:=1 to n do begin
for y:=1 to p do
write(a[x,y]:4);
writeln;
end;
end.

Оберіть дві складові комп'ютерної системи апаратна
складова
технічна
складова
мультимедійна

MOGZ ответил

Оберіть дві складові комп'ютерної системи апаратна складова технічна складова мультимедійна

MOGZ ответил

Оберіть дві складові комп'ютерної системи апаратна
складова
технічна
складова
мультимедійна