Составить алгоритм сложения двух целых чисел B и D, вводимых с клавиатуры. Результат сложения записать в виде переменной P. По данному алгоритму написать программу в Паскале.

Алгоритм

алг сложение
цел B,D,P
нач
ввод B
ввод D
P:=B+D
вывод P
кон
алг сложение
цел B,D,P
нач
ввод B
ввод D
P=B+D
вывод P
кон
алг сложение
цел B,D,P
нач
ввод B
ввод P
D:=B+P
вывод P
кон

Программа в Паскале

program summa;
var
B,D,P:integer;
begin
readln(B);
readln(D);
P:=B+D;
writeln(P);
end.
program summa;
var
B,D,P:integer;
begin
readln(B);
readln(D);
P:=B+D;
writeln(P);
program summa;
var
B,D,P:integer;
begin
readln(B);
readln(D);
P:=B+D;
writeln(B);
end.