Задача. Скорость одного автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу. Составьте программу для решения задачи (сопоставьте порядковый номер строки программы и исходный код строки). 1 program N; 2 var 3 ??? 4 begin 5 Write('Введите скорость первого автомобиля: '); 6 ??? 7 Write('Введите скорость второго автомобиля: '); 8 ??? 9 Write('Введите расстояние между автомобилями S : '); 10 ??? 11 ??? 12 ??? 13 ??? 14 ??? 15 end. 3 6 8 10 12 13 14 11 Readln(T); Readln(V1); Writeln('Расстояние между автомабилями: ', R); V1,V2,S,T,R: Real; Readln(S); Readln(V2); R := Abs (S - (V1 * T + V2 * T)); Write('Введите прошедшее время: ');
Задание

Задача. Скорость одного автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу.

Составьте программу для решения задачи \(сопоставьте порядковый номер строки программы и исходный код строки\).

1 program N;
2 var
3 ???
4 begin
5 Write\('Введите скорость первого автомобиля: '\);
6 ???
7 Write\('Введите скорость второго автомобиля: '\);
8 ???
9 Write\('Введите расстояние между автомобилями S : '\);
10 ???
11 ???
12 ???
13 ???
14 ???
15 end.

  • Объекты 1
    • 3
    • 6
    • 8
    • 10
    • 12
    • 13
    • 14
    • 11
  • Объекты 2
    • Readln\(T\);
    • Readln\(V1\);
    • Writeln\('Расстояние между автомабилями: ', R\);
    • V1,V2,S,T,R: Real;
    • Readln\(S\);
    • Readln\(V2\);
    • R := Abs \(S \- \(V1 \* T \+ V2 \* T\));
    • Write\('Введите прошедшее время: '\);