• Информатика!!!
    1.Напишите программу нахождение максимального среди трёх чисел.
    2.Вводятся оценки за контрольные работы по физике и математике,выведите на экран молодец,если их сумма равна или более 9,иначе подтянись.

Ответы 1

  • PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018Внимание! Если программа не работает, обновите версию!№1begin  var (a,b,c):=ReadReal3('Введите три числа через пробел:');  Writeln('Максимальное число ',Max(a,Max(b,c)))end.№2begin  var (a,b):=ReadInteger2('Введите две оценки через пробел:');  if a+b>=9 then Writeln('Молодец!')  else Writeln('Подтянись!')end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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