قسم الباسكال و الديلفي

Program The Total (input, output);
}This program find sum of two integer number{
Var
A, B, Total: integer;
Begin
Write (‘Enter two integer numbers to be add);
Readln (a, b(;
Total: = a+b;
Writeln) ‘The sum of’, A,’and’, B,’is’, Total'; (
End.