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

Ответы 1

  • var    a, b, c, p, s: integer;begin    readln(a, b, c);    p := a * b * c;    s := a + b + c;    writeln('P = ', p);    writeln('S = ', s);    write('Max = ');    if s > p then writeln(s) else writeln(p);end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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