Составить программу перевода расстояния в дюймах в сантиметры(1 дюйм=2,54 см).Дюймы изменяются от 1...

program DistanceConverter;

var
  inches, cm: real;
  i: integer;

begin
  writeln('Inches   Centimeters');
  writeln('-------------------');
  
  for i := 1 to 10 do
  begin
    inches := i;
    cm := inches * 2.54;
    writeln(i:6, cm:12:2);
  end;
  
end.

Эта программа в PASCAL преобразует расстояние в дюймах в сантиметры, используя формулу 1 дюйм = 2,54 см. Она выводит таблицу, где первый столбец представляет количество дюймов (от 1 до 10), а второй столбец - соответствующее количество сантиметров после преобразования.

Конечно! Давайте составим программу на языке Pascal, которая будет переводить расстояние в дюймах в сантиметры. Используем цикл для перебора значений дюймов от 1 до 10 и выведем результат в виде таблицы.

Вот пример программы:

program InchesToCentimeters;

const
  InchToCm = 2.54;  // Константа для перевода дюймов в сантиметры

var
  inches: Integer;
  centimeters: Real;

begin
  writeln('-------------------------');
  writeln('|  Inches  | Centimeters |');
  writeln('-------------------------');
  
  for inches := 1 to 10 do
  begin
    centimeters := inches * InchToCm;
    writeln('|    ', inches:2, '    |   ', centimeters:8:2, '   |');
  end;
  
  writeln('-------------------------');
end.

Объяснение:

1. Константа InchToCm: Мы создаем константу InchToCm, которая хранит значение 2.54. Это коэффициент перевода дюймов в сантиметры.

2. Переменные:

   • inches: Целочисленная переменная, которая будет принимать значения от 1 до 10 в цикле.
   • centimeters: Переменная типа Real для хранения результата перевода дюймов в сантиметры.

3. Цикл for: Используется для перебора значений дюймов от 1 до 10.

4. Перевод и вывод:

   • Внутри цикла мы вычисляем количество сантиметров, умножая текущий inches на InchToCm.
   • Затем выводим значения в формате таблицы с помощью writeln, используя форматирование для выравнивания столбцов.

5. Таблица: В начале и в конце выводятся линии, чтобы оформить вывод в виде таблицы.

Эта программа на Pascal простая и демонстрирует использование циклов, констант и базового форматирования вывода.