Используя оператор цикла и графики составьте программу для рисования на экране следующего : OOOO (P/S Это овалы в доль экрана, как сделать что бы не все их рисовать, а нарисовать одни овал и потом его просто продлить? что бы...

Question

Используя оператор цикла и графики составьте программу для рисования на экране следующего : OOOO (P/S Это овалы в доль экрана, как сделать что бы не все их рисовать, а нарисовать одни овал и потом его просто продлить? что бы...

Используя оператор цикла и графики составьте программу для рисования на экране следующего : OOOO (P/S Это овалы в доль экрана, как сделать что бы не все их рисовать, а нарисовать одни овал и потом его просто продлить? что бы они были в ряд)

Гость

Ответ(ы) на вопрос:

Accepted Answer

uses graph; var gd,gm,i,x:integer; begin gd:=vga; gm:=vgahi; initgraph (gd,gm,' '); if graphresult = 0 then begin x:=30; for i:=1 to 6 do begin ellipse (x,200,0,360,30,70); x:=x+60; end; end; readln; end.