Написать программу в которой пользователь должен будет ввести радиус окружности после чего на экране возникнет окружность с этим радиусом. В паскале.

1 Окт 2019 в 17:41
167 +1
0
Ответы
1
program CircleDrawing;
uses Crt, Graph;
var
radius, gd, gm: integer;
begin
// Initializing graphics mode
gd := Detect;
InitGraph(gd, gm, '');
// Getting radius of the circle from user
writeln('Enter the radius of the circle: ');
read(radius);
// Drawing the circle
setcolor(15);
circle(getmaxx div 2, getmaxy div 2, radius);
readkey;
closegraph;
end.
19 Апр 2024 в 18:47
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир