Помогите пожалуйста составить блок-схему ветвление по этой задаче: Program Program1; var...

0 голосов
62 просмотров

Помогите пожалуйста составить блок-схему ветвление по этой задаче:
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.


Информатика (294 баллов) | 62 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Fwqfsafasfasjfhasjk321fasdpofasf4fs


image
(4.7k баллов)