Question

Нужно!
программа на pascalabc
uses graphabc; var n,xr,yr: integer; begin setwindowsize(600,400); readln(n); for var i : = 1 to n do begin setpencolor(rgb(random(256),random(256),random(; xr: =random(601); yr: =random(401); circle(xr,yr,random(31)); floodfill(xr,yr,rgb(random(((256)); end; end.
выдает ошибку:
program1.pas: встречено 'end', а ожидался идентификатор

Answer 1

Объяснение:

Program Xr:

var n,xr,yr:integer;

begin setwindowsize(600,400);

readln(n);

for var i := 1 to n do

begin

end