Вычислить значения пути, пройденного телом за каждую из 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.
Объяснение кода листинга программы
- Создается переменная v типа real, которая будет использоваться для хранения значения скорости в метрах в секунду.
- Создается переменная i типа byte, которая будет использоваться для инкремента счетчика.
- Выводится сообщение
Введите скорость в м/сек v=для того, чтобы пользователь мог ввести значение скорости. - Выводится строка
------------------------для разделения данных. - Выводится заголовок
| Время, сек.| Путь, м |для разделения данных. - Запускается цикл for, который будет выполняться 12 раз (от i=1 до i=12).
- В каждой итерации цикла выводится значение счетчика i и значение скорости v, умноженное на i.
- После завершения цикла выводится последняя строка
------------------------. - Конец программы.