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