Вычислить стоимость поездки на разных автомобилях при известном расходе, расстоянии и цене на топливо. - Turbo Pascal
Формулировка задачи:
22. Человеку нужно съездить из Лондона в расположенный в 390 милях Эдинбург. Он может ехать на автомобиле марки Роллс-Ройс, либо на автомобиле марки Форд Эскорт. Роллс-Ройс расходует 1 галлон бензина на каждые 15 миль пути. Форд Эскорт расходует 1 галлон бензина на каждые 36 миль пути. Сколько будет стоить поездка в Эдинбург на Роллс-Ройсе, если стоимость 1 галлона бензина составляет Х фунта? Сколько денег он сбережет, если вместо этого он поедет на машине марки Форд Эскорт?
Решение задачи: «Вычислить стоимость поездки на разных автомобилях при известном расходе, расстоянии и цене на топливо.»
textual
Листинг программы
var Rolls,Rolls1,ford,ford1,eko,x:real; begin write('Введите стоимость бензина - '); readln(x); Rolls:=390/15; ford:=390/36; Rolls1:=Rolls*x; ford1:=ford*x; eko:=Rolls1-ford1; writeln('Если человек поедет на машине марки Форд Эскорт, он сэкономит ',eko:5:2,' фунтов'); readln end.
Объяснение кода листинга программы
- Создается переменная
Rolls
и присваивается ей значение 390/15, что означает расход топлива на 100 км для автомобиля Rolls-Royce. - Создается переменная
ford
и присваивается ей значение 390/36, что означает расход топлива на 100 км для автомобиля Ford. - Создается переменная
Rolls1
и присваивается ей значение произведения переменнойRolls
на значение переменнойx
, то есть стоимость поездки на автомобиле Rolls-Royce. - Создается переменная
ford1
и присваивается ей значение произведения переменнойford
на значение переменнойx
, то есть стоимость поездки на автомобиле Ford. - Создается переменная
eko
и присваивается ей значение разницы между стоимостью поездки на автомобиле Rolls-Royce и автомобиле Ford, то есть экономия топлива. - Выводится сообщение о том, сколько фунтов сэкономит человек, если он поедет на машине марки Форд Эскорт.
- Программа завершается, и пользователю предлагается ввести данные для расчета стоимости поездки.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д