Решаем задачи Абрамян на Паскале. Begin 37

Begin37. Скорость первого автомобиля $$V_1$$ км/ч, второго — $$V_2$$ км/ч, расстояние между ними $$S$$ км. Определить расстояние между ними через $$T$$ часов, если автомобили первоначально движутся навстречу друг другу. Данное расстояние равно модулю разности начального расстояния и общего пути, проделанного автомобилями; общий путь = время * суммарная скорость.

Решение:

program Begin37;
var
  V1,V2,S,T,SResult: Real;
begin
  Write('Введите скорость первого автомобился: ');
  Readln(V1);
  Write('Введите скорость второго автомобиля: ');
  Readln(V2);
  Write('Введите расстояние между автомобилями S : ');
  Readln(S);
  Write('Введите прошедшее время: ');
  Readln(T);
  SResult:=Abs(S-(V1*t+V2*t));
  Writeln('Расстояние между автомабилями: ',SResult);
end.

program Begin37;

var

V1,V2,S,T,SResult: Real;

begin

Write('Введите скорость первого автомобился: ');

Readln(V1);

Write('Введите скорость второго автомобиля: ');

Readln(V2);

Write('Введите расстояние между автомобилями S : ');

Readln(S);

Write('Введите прошедшее время: ');

Readln(T);

SResult:=Abs(S-(V1*t+V2*t));

Writeln('Расстояние между автомабилями: ',SResult);

end.

Другие задачи из раздела Begin можно посмотреть здесь.

Решаем задачи Абрамян на Паскале. Begin 37

Комментарии:

Добавить комментарий Отменить ответ