2.Напишите программу на языке Паскаль, в которой введенное с клавиатуры число увеличивается на 10 до тех пор, пока оно не станет больше 100.

Вот пример программы на языке Паскаль, которая увеличивает введенное с клавиатуры число на 10 до тех пор, пока оно не станет больше 100:

program IncreaseNumber;

var
  num: Integer;

begin
  Write('Введите число: ');
  ReadLn(num);
  
  // Увеличиваем число на 10, пока оно не станет больше 100
  while num <= 100 do
  begin
    num := num + 10;
  end;
  
  WriteLn('Полученное число: ', num);
end.

Описание программы:

1. Программа запрашивает у пользователя ввод числа.
2. Запускается цикл while, который продолжает выполняться, пока число num не станет больше 100.
3. Внутри цикла число увеличивается на 10.
4. После завершения цикла программа выводит конечное значение числа.