Задать вопрос Регистрация
Помочь другим

  • Напишите программы в PASCAL!!! 37. Программа запрашивает два числа и выводит их в порядке возрастания. Затем меньшее

Ответы 1

  • 37)var  a,b,c : real;begin readln(a, b); begin  if a >= b   then writeln(b, a)  else   writeln(a,\'и\', b) end; if a >= b  then b:= b*a*2   else       a:= b*a*2;  if a>= b   then a:= (a+b)/2  else     b:= (a+b)/2;writeln(a,\'и\',b);end.

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

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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