написать программку которая вычисляет среднюю скорость по введенным с клавиатуры двум

Формула вычисления S1/t1+S2/t2=Sсредн.?

да

Формулу напишешь напишу пронрамму

программку

Желая быстрее всего формула вот такая (v1-v2)/(t1-t2)=vсредн

щас будет

да,наверное,напиши программку по этой формуле плз

Var
 v1,v2,t1,t2:longint;
begin
 write('Write 2 speeds through the space: ');read(v1);readln(v2);
 write('Write 2 time interval through the space: ');read(t1);readln(t2);
 writeln('Average speed: ',(v1-v2)/(t1-t2):0:2); // здесь можешь формулу поменять если что
end.