Найти квадрат наибольшего из трех чисел

Найти квадрат наибольшего из трех чисел
Гость
Ответ(ы) на вопрос:
Гость
var a,b,c : integer; begin writeln('Введите три числа:'); readln(a,b,c);  if a > b then   if a > c then writeln(sqr(a))   else writeln(sqr(c))  else if b > c then writeln (sqr(b)) else writeln(sqr(c));  end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы