program Cxema;
var a : integer;
b,s: real;
begin
a:=5;
b:=- 3.5;
s:=a+b;
writeln( 'сумм а=5 и b = -3.5 ', s);
end.
