Ответы и объяснения

2014-04-12T12:55:56+04:00
Program chisla; x, y, s:integer; begin clrscr; readln (x); readln (y); if x>0 and y>0 then s:=x+y else s:=x*y; writeln (s); end.