Ввести длину пути и время движения двух автобусов. Определить скорость какого автобуса меньше. Подсчитать за какое время он проедет такое же расстояние если увеличить его скорость на 10 едениц. Зарание спасибо!
Ввести длину пути и время движения двух автобусов. Определить скорость какого автобуса меньше. Подсчитать за какое время он проедет такое же расстояние если увеличить его скорость на 10 едениц. Зарание спасибо!
Гость
Ответ(ы) на вопрос:
Гостьvar
rast, t, speed: real;
begin
write('Dlina puti = ');
readln(rast);
write('Vremya = ');
readln(t);
speed := rast/t;
writeln('Skorost = ', speed:3:2);
t := rast/(speed+10);
writeln('Esli skorost na 10 bolshe, to vremya = ', t:3:2);
readln;
end.
Не нашли ответ?
Похожие вопросы