Дан алгоритм в результате выполнения которого на координатной плоскости будет нарисован рисунок.получите - id994673220210710 от akalitp08ipr 10.07.2021 13:00

Question

Информатика: Дан алгоритм в результате выполнения которого на координатной плоскости будет нарисован рисунок.получите рисунок 1)переведи перо в точку(1,1) 2) опустите пепо 3) сдвинь на вектор (2,3) 4) сдвинь на вектор (-2,2) 5)переведи перо в точку (1,10) 6) сдвинь на вектор (2,-2) 7) сдвинь на вектор (1,3) 8) переведи перо в точку (6,9) 9) переведи перо в точку (9,11) 10)сдвинь на вектор (-1,-4) 11) сдвинь на вектор (3,-1) 12) сдвинь на вектор (2,-2) 14) сдвинь на вектор(-5,1) 15) переведи перо в точку (3,4)

akalitp08ipr · Accepted Answer

1.
Program naconecto;const n=5;varA:array[1..n,1..n] of integer;sum,poz,i,j:integer;BEGINrandomize;for i:=1 to n do begin for j:=1 to 1 do begin a[i,j]:=random(-100,100); sum:=sum+1; if a[i,j]>=0 then begin poz:=poz+1; end; end; end; writeln('cyMMa=',sum); writeln('noJlo)|(uTeJlbHbIe=',poz);END.2.
Program naconecto;const n=5;varA:array[1..n] of integer;i,sum:integer;BEGINsum:=0;randomize;for i:=1 to n do begin a[i]:=random(-5,5); if a[i]<>0 then begin sum:=sum+1; end else begin break; end; end;writeln('cyMMa=',sum);END.

MOGZ ответил