Напишите программки в Паскале!!!_ 2. Расход бензина на 100 км пути

Напишите программки в Паскале!!!_ 2. Расход бензина на 100 км пути в среднем сочиняет 9 л. Определить цена бензина для расстояния 200 км, 400 км, 600 км, 800 км, 1000 км, если стоимость 1-го литра одинакова х руб. 3. Цена 1 кг сыра К рублей. Распечатать таблицу цены порций сыра по 100 г, 200 г, 300 г, 400 г, 500 г, 600 г, 700 г.

Задать свой вопрос
1 ответ

program petrol;
var i, x: integer;
begin
write(Введите стоимость одного литра бензина: );
readln(x);
For i:= 1 to 5 do
writeln(Расстояние: , i * 200 : 4, км, цена бензина , i * 18 * x : 5, р. );
end.

program cheese;
var i, k: integer;
begin
write(Введите цену одного килограмма сыра: );
readln(k);
For i:= 1 to 10 do
writeln(Порция сыра: , i * 100 : 4, г, стоимость порции , (i * k) / 10 : 4, р.);
end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт