Регистрация
Nastya23160
04.09.2022 10:07
Информатика
Есть ответ 👍

Найти и напечатать u=max {(xy+z)/5,(x+2yz)/3}

202
215
Посмотреть ответы 2

Ответы на вопрос:

1ivel3
1ivel3
4,6(72 оценок)
// pascalabc.net 3.2, сборка 1437 от 03.05.2017 // внимание! если программа не работает, обновите версию! begin   var x,y,z: real; read(x,y,z);   writeln(max((x*y+z)/5,(x+2*y*z)/3)) end. пример 2.5 -3.7 10 0.15
TimLih990
TimLih990
4,7(63 оценок)

var?

    n, m: longint;

    a: byte;

begin

    readln(n);

    m : = 0;

    while n> 0 do begin

        a : = n mod 10;

        n : = n div 10;

        m : = m*10 + a;

    end;

    writeln(m);

 

readln;

end.

Популярно: Информатика