Предмет: Информатика,
автор: holmskaja
Написать текст программы
_____________________
Приложения:
Ответы
Автор ответа:
0
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.
Похожие вопросы
Предмет: Математика,
автор: brussenko89
Предмет: Физика,
автор: musaevazuhra0411
Предмет: Физика,
автор: islamisaev7462
Предмет: Химия,
автор: usmanownick