1. Написать программу. Условие задачи: Написать программу вывода на экран лесенкой трех последовательно идущих трехзначных чисел. Первое число вводит пользователь, остальные вычисляются в программе. Пример работы программы: 213 214 215

program zz1;

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

begin

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

read (a);

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

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

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

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

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

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

end.