• Pascal ABC
    Составить программу.
    С клавиатуры вводится 3 числа. Найти наибольшее ПО МОДУЛЮ.

Ответы 2

  • ОГРОМНОЕ спасибо, прямо от души)))
  • var a,b,c:integer;

    begin

    readln (a,b,c);

    if (abs(a)>abs(b)) and (abs(a)>abs(c)) then writeln('Наибольшее по модулю число a');

    if (abs(b)>abs(a)) and (abs(b)>abs(c)) then writeln('Наибольшее по модулю число b');

    if (abs(c)>abs(a)) and (abs(c)>abs(b)) then writeln('Наибольшее по модулю число c')

    end.

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years