Решить в pascal 1.скорость первого автомобиля v1 км/час, второго – v2 км/час. расстояние между ними s км. какое расстояние между ними будет через t часов, если автомобили двигаются в разные стороны. 2.дана цена одного килограмма конфет – а рублей. определить сколько будут стоить пакеты конфет в 200 грамм и 1,2 кг.

//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.