program Project1; var a: integer; b: integer; c: integer; s: string; begin Writeln('Enter A:'); Read(a); Writeln('Enter B:'); Read(b); c := a + b; Writeln(a, '+', b, '=', c); Readln(s); Readln(s); end.