Объявить переменную целого типа, присвоить ей некоторое значение, вывести эту переменную на экран, далее присвоить этой переменной новое значение, снова вывести эту переменную на экран.
program Nazvanie;
var
a: integer;
begin
a:= 1;
writeln (a);
a:= 2;
writeln(a);
end.
нет на поскали надо
хорошо, щас всё будет
готово
строка program вариативна