Решить задачи в Pascal 1.Скорость первого автомобиля V1 км/час, второго – V2 км/час....

Question

Решить задачи в Pascal

1.Скорость первого автомобиля V1 км/час,
второго – V2 км/час. Расстояние между
ними S км. Какое расстояние между ними
будет через t часов, если автомобили
двигаются в разные стороны.

2.Дана цена одного килограмма конфет –
А рублей. Определить сколько будут
стоить пакеты конфет в 200 грамм и 1,2
кг.

Answer 1

//Pascal

//1)
var V1, V2, S, t: integer;
begin
  write('Введите V1: '); readln(V1);
  write('Введите V2: '); readln(V2);
  write('Введите S: '); readln(S);
  write('Введите t: '); readln(t);
  writeln('Расстояние между авто через ',t,' часов = ',V1*t+s+V2*t);
end. 

//2)
var A, tmp: real;
begin
  write('Введите A: '); readln(A);
  tmp := A / 5;
  writeln('Цена за 200г = ', tmp, '. Цена за 1,2кг = ', A + tmp);
end.

---

---