program raf105;
var V,t,x: integer;
begin
write('Скорость поезда V(км/час.) = ');
readln(V);
write('Время в пути t(час.) = ');
readln(t);
x:= V*t;
writeln('Пройденное расстояние: ',x,' (км.)');
end.
<h3><em><u>Язык PascalABC</u></em></h3>
Масса 8 л. бензина 5,68 кг. Цистерна имеет обьём 500 м3(метров в кубе) . Хватит ли её, чтобы вместить А тонн бензина?
так 500м3 это 500 000 литров. Мы делим 500 000 на 8 чтобы узнать сколько раз можно залить, затем результат умножаем на 5,68 кг чтобы узнать сколько килограмм всего примерно 355 000 кг. (лучше пересчитать). Так и это все Х
Если Х>A тогда влезет
иначе Если Х<А тогда не влезет
Иначе Вам повезло
Вариант с полным перебором. Решение в прикрепленном файле.
Входные данные:
4 63 4 1 34 1 3 22 3 4 31 2 3 41 3 2 42 1 4 3Выходные данные:
2 3 4 1
Из 10 л ведра переливаем в 6 л ведро . мы знаем что в первом осталось 4 л. × 3 и : 2