• Написать программу.Даны два числа а и б, наибольшее из них умножить на 10, а наименьшее разделить на 10

Ответы 1

  • var a,b: Real;beginwriteln('Введите a и b');readln(a,b);if a>b thenbegina:=a*10;b:=b/10;end;if a<b thenbeginb:=b*10;a:=a/10;end;if a=b thenbeginb:=b*10;a:=a*10;end;writeln('a: ',a);writeln('b: ',b);end.
    • Автор:

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

Войти через Google

или

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

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

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