• Source
    1. program int2;
    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 = ',a);
    12. writeln('b = ',b);
    13. writeln('c = ',c);
    14. end.