1. Написать программку. Условие задачи: Написать программку вывода на экран лесенкой

program zz1;

var a, i :integer; // задаем переменные целого типа

begin

write( введите первое число a );  // вводим с клавиатуры 1-ое число

read(a);

i:=3; // задаем отступ для первого числа

writeln(a:i); // выводим 1-ый ответ

i:=i + 1; // задаем отступ для второго числа

writeln(a + 1:i); // выводим второй ответ

i:=i + 1; // задаем отступ для третьего числа

write(a + 2:i); // выводим третий ответ

end.