СРОЧНО program n_1; var x,y,z, res: integer; begin writeln('Поиск наибольшего числа из...

Question

СРОЧНО program n_1; var x,y,z, res: integer; begin writeln('Поиск наибольшего числа из трех') write(Введите числа x,y,z >>') readln(x,y,z); res:=x; if(y>res) then res:=y; if(z>res) then res:=z; writeln('Наибольшее число =',res); end. Построчно описать программный код разработанной программы и прислать его описание

Answer 1

Ответ:  он не работал, я немного переделал

program n_1;

var x,y,z, res: integer;

begin

writeln('Поиск наибольшего числа из трех');

writeln('Введите числа x,y,z >>');

readln(x,y,z);

res:=x;

if(y>res) then res:=y;

if(z>res) then res:=z;

writeln('Наибольшее число =',res);

end.