• 1. Дано 3 числа. Найти произведение двух наименьших из этих чисел 
    написать программу на pascal

Ответы 5

  • Program DvachAnon;var n:integer;beginwrite('Введите натуральное число:' ); read(n); if (n mod 2 = 0) and (n/2 > 10) then writeln(n*2) else writeln(n)end.
  • Program DvachAnon;var n:integer;begin write('Введите натуральное число:' ); read(n); if (n mod 2 = 0) and (n/2 > 10) then writeln(n*2) else writeln(n)end.
    • Автор:

      acacio
    • 5 лет назад
    • 0
  • это какая по счету задача?
  • 7 вроде
    • Автор:

      paulhicks
    • 5 лет назад
    • 0
  • спасиб
    • Автор:

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

Войти через Google

или

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

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

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