Skip to content

Instantly share code, notes, and snippets.

@KaduNovoK
Created April 9, 2014 02:14
Show Gist options
  • Save KaduNovoK/10219615 to your computer and use it in GitHub Desktop.
Save KaduNovoK/10219615 to your computer and use it in GitHub Desktop.
Program to sum two integer values
{
Program to sum two values
Just to remember the basic of pascal
(c) Kadu NovoK <[email protected]>
}
program sum_program; // Header
{ Statements }
var
a: integer;
b: integer;
sum: integer;
{ program body }
begin
write('Input the value A: ');
readln(a);
write('Input the value B: ');
readln(b);
sum := a + b;
writeln();
write('The sum is: ');
writeln(sum);
end.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment