Определи вид цикла.

uses drawman;
var i: integer;
begin
task ( 'c1' );
topoint (1,3);
for i: =1 to 16 do
begin
pendown;
onvector (0,-1);
onvector (1,1);
end;
penup;
topoint (0,0);
end.

arabenko    2   16.11.2019 14:13    20