
Bastarf
5 год назад
Написать текст программы _____________________

ОТВЕТЫ

Alisa
Oct 24, 2020
Program n1;
var a,b: integer;
begin
readln(a,b);
if a>b then
begin
b:=a+b;
writeln(b);
end else if a<b then
begin
a:=a+b;
writeln(a);
end;
end.
var a,b: integer;
begin
readln(a,b);
if a>b then
begin
b:=a+b;
writeln(b);
end else if a<b then
begin
a:=a+b;
writeln(a);
end;
end.
478
Смежные вопросы: