Этот код C++ нужно перевести в блок-схему uses crt;
var a,b,c:array[1..100] of integer;
i,j,n,p:integer;
begin
ClrScr;
Randomize;
Write('n=');
Readln(n);
for i:=1 to n do
begin
a[i]:=random(20)-10;
Write(a[i]:4);
b[i]:=random(20)-10;
end;
Writeln;
for i:=1 to n do
Write(b[i]:4);
Writeln;
for i:=1 to n do
if (a[i] mod 2<>0) and (a[i]<>b[i]) then
begin
p:=p+1;
c[p]:=a[i];
end;
for i:=1 to p do
Write(c[i]:4);
Readln;
end.

Как это сделать, я не понимаю

Tennisboy    3   16.10.2020 11:43    1