Пользователь нажимает цифру от 1 до 9 и в случайном месте экрана рисуется кружок с радиусом, соответствующем нажатой цифре. выход из программы - цифра 0. pascal

elena563 elena563    2   03.10.2019 13:00    0

Ответы
BezNikaVoobshe BezNikaVoobshe  09.10.2020 14:13

uses GraphABC;

var r:integer;

begin

readln (r);

while r<>0 do

begin

Circle(random(631),random(471),r);

readln (r)

end

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика