Question

Надо сделать в Pascal ABC.

Answer 1

program name;
uses Graphabc;
var
x,y,r,i,k:integer;
begin   
write('Введите количество кругов: '); readln(k);     
for i:= 1 to k do 
BEGIN     
x:= random(600);     
y:= random(400);     
r:= random(80);        
Circle(x, y, r); 
end;  
end.

Answer 2

Я не знаю как добавить цвет, пробовал использовать setbrushcolor(), но почему то пишет ошибку
Нельзя преобразовать тип integer к System.Drawing.Color

Answer 3

Если кто нибудь знает почему вылазиет эта ошибка, пожалуйста напишите