Вычислить значения пути, пройденного телом за каждую из 12 секунд - Pascal

Узнай цену своей работы

Формулировка задачи:

Вычислить значения пути, пройденного телом за каждую из 12 секунд. Скорость тела запросить с клавиатуры. Результат представить в виде таблицы.

Решение задачи: «Вычислить значения пути, пройденного телом за каждую из 12 секунд»

textual
Листинг программы
var v:real;
    i:byte;
begin
write('Введите скорость в м/сек v=');
readln(v);
writeln('------------------------');
writeln('| Время, сек.| Путь, м |');
writeln('------------------------');
for i:=1 to 12 do
writeln('|',i:8,'    |',i*v:8:2,' |');
writeln('------------------------');
end.

Объяснение кода листинга программы

  1. Создается переменная v типа real, которая будет использоваться для хранения значения скорости в метрах в секунду.
  2. Создается переменная i типа byte, которая будет использоваться для инкремента счетчика.
  3. Выводится сообщение Введите скорость в м/сек v= для того, чтобы пользователь мог ввести значение скорости.
  4. Выводится строка ------------------------ для разделения данных.
  5. Выводится заголовок | Время, сек.| Путь, м | для разделения данных.
  6. Запускается цикл for, который будет выполняться 12 раз (от i=1 до i=12).
  7. В каждой итерации цикла выводится значение счетчика i и значение скорости v, умноженное на i.
  8. После завершения цикла выводится последняя строка ------------------------.
  9. Конец программы.

Оцени полезность:

9   голосов , оценка 4.111 из 5