Screen 12
line(20,10)-(30,20),b
line(40,10)-(50,20),b
line(60,10)-(70,20),b
line(80,10)-(90,20),b
line(100,10)-(110,20),b
line(10,20)-(20,30),b
line(30,20)-(40,30),b
line(50,20)-(60,30),b
line(70,20)-(80,30),b
line(90,20)-(100,30),b
"Каждая вторая" означает, что с дистанции сошли машины с четными номерами.
var
i:integer;
begin
Write('С дистанции сошли машины с номерами ');
i:=2;
repeat
Write(i,' ');
i:=i+2
until i>17
end.
Результат
С дистанции сошли машины с номерами 2 4 6 8 10 12 14 16
1- думаю г :D
2- г? что ли я не видела ничего такого где можно было бы редактировать... там просто записываешь и все вроде :D сам проверь)