Введите с клавиатуры положительные переменные c и d. Если c больше d, то нарисуйте окружность с центром в точке (c,c) и радиусом, равным d. Иначе нарисуйте отрезок с концами в точках (100,с) и (100,d).
Введите с клавиатуры положительные переменные c и d. Если c>d, то нарисуйте окружность с центром в точке (c,c) и радиусом, равным d. Иначе нарисуйте отрезок с концами в точках (100,с) и (100,d).
Гость
Ответ(ы) на вопрос:
ГостьЕсли нужна программа на паскале, то как-то так
uses graphabc;
var c,d:integer;
begin
read(c,d);
if c>d then circle(c,c,d) else line(100,c,100,d)
end.
Не нашли ответ?
Похожие вопросы