Данная программа работать не будет, вот исправленная программа:
program a1; // Название программы (a1)var a,b,s: integer; // Список переменных, которые принадлежат типу Innteger;begin // Началоa:=10; //Присвоение к переменной a значение 10.b:=7; //Присвоение к переменной b значение 7.s:=a+b; //Присвоение к переменной s сумму переменной a и b.writeln ('Сумма=', s); //Вывод значения переменной s.
end. //конец
Программа выведет следующее: "Сумма=17".