юлдуз 6666



жүктеу/скачать 11,77 Kb.
Дата01.04.2020
өлшемі11,77 Kb.
#61280
Байланысты:
юлдуз 6666
Есептер 8 сынып, Лекция 1, юлдуз 6666, юлдуз 6666, Паскаль бағдарламалау тілі1, Паскаль бағдарламалау тілі1
program esep_26;

var V1, V2, l, t, X1, X2, S,t1, deltat, X0:real;

begin

readln(v1, V2, l, t);

X1:=V1*t;

X2:=(l-(V2*t));

t:=(l/(V1+V2));

S:=(abs(X1-X2));

X1:=V1*t;

t1:=X1/V2;

deltat:=(((l-X0)/V2)-(X0/V1));

X0:=((l*V1)-(V1*V2*deltat)/(V1+V2));



End.
жүктеу/скачать 11,77 Kb.

Достарыңызбен бөлісу:



©www.engime.org 2024
әкімшілігінің қараңыз
    Басты бет