Информатика, опубликовано 2018-08-22 23:28:06 by Гость

Составьте программу в Pascal по следующему сценарию: при нажатии на клавишу а произвольном месте экрана появляется квадратик, при нажатии на клавишу - окружность.

Ответ оставил Гость

Uses GraphABC;
var
  s:char;
  x,y,r:integer;
begin
readln(s);
x:=Random(100)+200;
y:=Random(100)+200;
r:=Random(100)+100;
if s=к then DrawRectangle(x,y,x+r,y+r);
if s=о then DrawCircle(x,y,r);
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.