Хххееелллпппуууйййтттеее

Program P1;

uses crt; - вывод окошка

var a,b,c:integer;

begin

write('a=');

read(a);

write('b=');

read(b);

if a>0 then

c:= a+ b

else c:=b;

writeln('c=',c);

end.