Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Помогите пожалуйста составить блок-схему ветвление по этой задаче:
Program Program1;
var
s,v1,v2,v3,t1,t2,t3:real;
begin
write(Введите скорость движения по равнине: );
readln(v1);
write(Введите скорость движения в гору: );
readln(v2);
write(Введите скорость движения под гору: );
readln(v3);
write(Введите время движения по равнине: );
readln(t1);
write(Введите время движения в гору: );
readln(t2);
write(Введите время движения под гору: );
readln(t3);
S:=t1*v1+t2*v2+t3*v3;
writeln(Путь = ,S);
end.

Ответ оставил Гость

Fwqfsafasfasjfhasjk321fasdpofasf4fs