var
x,y:integer;
begin
read(x,y);
if x < y then
x:=y;
write(x);
end.
Объяснение:
Поделитесь своими знаниями, ответьте на вопрос:
какой алгоритм использует в данном коде программа нахождения наибольшего из двух чисел разветвляющийся линейный циклический
var
x,y:integer;
begin
read(x,y);
if x < y then
x:=y;
write(x);
end.
Объяснение: