var a, b, sum: integer ;

begin

writeln( 'Ведите два целых числа') ;

readln(a,b) ;

sum : a+b ;

writeln ( ' Сумма равна' , sum) ;

end .

Нечего не понял но очень интересно

Объяснение: Что нужно исправить ?

Все, что я вижу, это ошибка в 6й строке кода.

Правильный код:

Program summa ;

var a, b, sum: integer ;

begin

writeln( 'Ведите два целых числа') ;

readln(a,b) ;

sum := a+b ;

writeln ( ' Сумма равна ' , sum) ;

end .