Var i integer begin for i. Program qq; var a, b, c: integer; begin readln ( a, b ); c := a + b; writeln ( c ); end.. sqr в паскале. writeln sqr. if a=5 then begin writeln.