Ввести длину пути и время движения 2-ух автобусов. Определить скорость какого

Ввести длину пути и время движения 2-ух автобусов. Определить скорость какого автобуса меньше. Подсчитать за какое время он проедет такое же расстояние если увеличить его скорость на 10 едениц. Зарание спасибо!

Задать свой вопрос
1 ответ
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.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт