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

1. Пешеход шел по пересеченной местности. Его скорость движения по равнине v1 км/ч, в гору — v2 км/ч и под гору — v3 км/ч. Время движения соответственно t1, t2 и t3 ч. Написать программу определяющую, какой путь прошел пешеход? 2. Написать программу, вычисляющую путь, пройденный лодкой, если ее скорость в стоячей воде v км/ч, скорость течения реки v1 км/ч, время движения по озеру t1 ч, а против течения реки – t2 ч.

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

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.

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