program test1;
var 
a,b:integer;
begin
a:=8;
b:=10;
a:=a+13;
b:=a+b;
b:=(5+5)*4;
write('Koniec');
read(a);
write(a);
write(b);
end.