
Ksu
4 год назад
Пожалуйста посчитайте ПОЖАЛУЙСТАПреобразовать алгоритм, записанный на алгоритмическом языке в программу на языке Pascal алг максимальное число нач цел a,b,mввод a,bесли a>=bто m:=aиначе m:= bвсевывод mкон
ОТВЕТЫ

Velichko
Oct 24, 2020
program maximum_value;
var
a, b, m: integer;
begin
read(a, b);
if a >= b then
m := a
else m := b;
writeln(m);
end.
var
a, b, m: integer;
begin
read(a, b);
if a >= b then
m := a
else m := b;
writeln(m);
end.
361
Смежные вопросы: