• Source
    1. program int3;
    2. var
    3. a,b,c:integer;
    4. begin
    5. writeln('Key in a = ');
    6. readln(a);
    7. writeln('Key in b = ');
    8. readln(b);
    9. writeln('Key in c = ');
    10. readln(c);
    11. writeln(a,' + ',b,' = ',a+b);
    12. writeln(a,' - ',b,' = ',a-b);
    13. writeln(a,' * ',b,' = ',a*b);
    14. end.