Помогите, очень нужно!
Программа на 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(256)));xr:=random(601);yr:=random(401); circle(xr,yr,random(31)); floodfill(xr,yr,rgb(random(256),(random(256),(random(256)); end; end.
выдает ошибку:
Program1.pas: Встречено 'end', а ожидался идентификатор
Программа на 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(256)));xr:=random(601);yr:=random(401); circle(xr,yr,random(31)); floodfill(xr,yr,rgb(random(256),(random(256),(random(256)); end; end.
выдает ошибку:
Program1.pas: Встречено 'end', а ожидался идентификатор
Answers & Comments
Объяснение:
Program Xr:
var n,xr,yr:integer;
begin setwindowsize(600,400);
readln(n);
for var i := 1 to n do
begin
end