Программа в Паскале
 1/program summa;
 var
 A,M,P:integer;
 begin
 readln(A);
 readln(M);
 P:=A+M;
 writeln(P);
 end.
 2/program summa;
 var
 A,M,P:integer;
 begin
 readln(A);
 readln(M);
 P:=A+M;
 writeln(A);
 end.
 3/program summa;
 var
 A,M,P:integer;
 begin
 readln(A);
 readln(M);
 P:=A+M;
 writeln(P);
 Выберите правильный вариант
                                                            
                             
                         
                    
program summa;
var
A,M,P:integer;
begin
readln(A);
readln(M);
P:=A+M;
writeln(P);
end.
Первый вариант.