Question

SOS! Решите в Pascal 1. Составьте программу, которая печатает таблицу перевода расстояний из дюймов в сантиметры (1 дюйм = 2,5 см) для значений длин от 1 до 20 дюймов. P.S Ну пожалуйста,я не могу решить!

Answer 1

Конечно, я могу помочь вам с этой программой на языке Pascal. Вот пример кода:

program InchesToCm;
var
  inches, cm: real;
  i: integer;
begin
  Writeln('Таблица перевода расстояний из дюймов в сантиметры');
  Writeln('-----------------------------------------------');
  Writeln('Дюймы  |  Сантиметры');
  Writeln('-----------------------------------------------');
  for i := 1 to 20 do
  begin
    inches := i;
    cm := inches * 2.5;
    Writeln(i:4, '     |   ', cm:5:2);
  end;
  Writeln('-----------------------------------------------');
end.

В этой программе мы используем переменные `inches` и `cm` для хранения значения в дюймах и сантиметрах соответственно. Затем мы используем цикл `for` для итерации от 1 до 20 и преобразуем каждое значение дюймов в сантиметры, умножая его на 2.5. Затем мы выводим полученные значения в виде таблицы.

Результат выполнения программы должен выглядеть следующим образом:

Таблица перевода расстояний из дюймов в сантиметры
-----------------------------------------------
Дюймы  |  Сантиметры
-----------------------------------------------
   1     |    2.50
   2     |    5.00
   3     |    7.50
   4     |   10.00
   5     |   12.50
   6     |   15.00
   7     |   17.50
   8     |   20.00
   9     |   22.50
  10     |   25.00
  11     |   27.50
  12     |   30.00
  13     |   32.50
  14     |   35.00
  15     |   37.50
  16     |   40.00
  17     |   42.50
  18     |   45.00
  19     |   47.50
  20     |   50.00
-----------------------------------------------

Надеюсь, это помогло! Если у вас есть еще вопросы, не стесняйтесь задавать.