Для составления программы в Pascal, которая будет печатать таблицу перевода расстояний из дюймов в сантиметры для значений длин от 1 до 20 дюймов, вам понадобится использовать цикл и формулу для перевода дюймов в сантиметры.
Пример программы на Pascal:
program ConversionTable;
var
inches: integer;
centimeters: real;
begin
writeln('Таблица перевода длин из дюймов в сантиметры');
writeln('---------------------------------------------');
writeln('Дюймы', ' ':10, 'Сантиметры');
for inches := 1 to 20 do
begin
centimeters := inches * 2.54; // Формула для перевода дюймов в сантиметры (1 дюйм = 2.54 см)
writeln(inches, ' ':10, centimeters:0:2);
end;
end.
Объяснение:
- В программе мы объявляем переменные
inchesдля хранения значения в дюймах иcentimetersдля хранения значения в сантиметрах. - Далее мы выводим заголовок таблицы.
- Затем, с помощью цикла
for, проходим значения дюймов от 1 до 20. - Внутри цикла мы умножаем значение в дюймах на 2.54 (коэффициент для перевода в сантиметры) и записываем результат в переменную
centimeters. - Наконец, мы выводим значения дюймов и соответствующие им сантиметры с помощью
writeln.
Вы можете скомпилировать и запустить эту программу в вашей среде разработки Pascal для получения таблицы перевода расстояний из дюймов в сантиметры от 1 до 20.