• Составить подпрограмму которая вводит с клавиатуры три числа находит наибольшее из них выводит его на экран.

Ответы 1

  • Это просто программа, ее легко можно изменить на подпрограмму, если тебе нужноProgram P1;var a,b,c:real;beginwrite('Введите три числа: ');readln(a,b,c);if (a>b) and (a>c) then writeln('Число ',a,' самое большое');if (b>a) and (b>c) then writeln('Число ',b,' самое большое');if (c>a) and (c>b) then writeln('Число ',c,' самое большое');readln;end.
    • Автор:

      logan38
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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