Напечатать таблицу перевода расстояний в дюймах в сантиметры для значений 10, 11, 12, ... 20 дюймов (1 дюйм = 2,54 см) Выход: 10 дюймов = 25,4 см 11 дюймов = 27,94 см ... 20…

Конечно! Ниже я приведу решения задачи на языке Паскаль, сначала с использованием цикла while, а затем с циклом repeat. В задачах использована конвертация из дюймов в сантиметры по формуле: 1 дюйм = 2,54 см. Будем последовательно выводить таблицу для значений от 10 до 20 дюймов.

Решение с использованием цикла while

program ConversionWhile;
var
  inches: Integer;
  centimeters: Real;
begin
  inches := 10; // начинаем с 10 дюймов
  while inches <= 20 do
  begin
    centimeters := inches * 2.54;
    writeln(inches, ' дюймов = ', centimeters:0:2, ' см');
    inc(inches); // увеличиваем значение на 1
  end;
end.

Объяснение:

• inches — переменная для значения дюймов.
• Начинаем с 10 и до 20 включительно.
• Внутри цикла вычисляем значение в сантиметрах, умножая дюймы на 2.54.
• Выводим результат в формате с двумя знаками после запятой.
• После каждого шага увеличиваем inches на 1 с помощью inc(inches).

Решение с использованием цикла repeat

program ConversionRepeat;
var
  inches: Integer;
  centimeters: Real;
begin
  inches := 10; // начинаем с 10 дюймов
  repeat
    centimeters := inches * 2.54;
    writeln(inches, ' дюймов = ', centimeters:0:2, ' см');
    inc(inches);
  until inches > 20;
end.

Объяснение:

• Логика та же, только цикл repeat...until.
• Выполняется минимум один раз, а затем проверяется условие (until inches > 20).
• Когда inches становится больше 20, цикл завершается.

Если нужно, я могу объяснить подробнее любой из этих вариантов!