Ответ:
Объяснение:
program a1;
var a, b, s:integer;
begin
readln(a, b);
if a>0
then s:=a+b
else s:=a-b;
writeln(s);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Объяснение:
program a1;
var a, b, s:integer;
begin
readln(a, b);
if a>0
then s:=a+b
else s:=a-b;
writeln(s);
end.