Найти алгоритм решения и реализовать его с оператора(операторов) if-then-else. в атлантическом океане терпит бедствие пассажирский теплоход ”посудина”. все пассажиры будут спасены, если на успеют два судна. судно продержится на плаву t часов. скорость судов-спасателей 40 узлов. составить программу, определяющую спасутся ли пассажиры. известны расстояния от трех судов-спасателей до тонущего судна.
218
244
Ответы на вопрос:
Const v=40; var t,r1,r2,r3: real; n: integer; begin write('сколько часов продержатся пассажиры? '); readln(t); write('введите расстояния до трех спасателей (в узлах): '); readln(r1,r2,r3); if r1/v< t then n: =1; if r2/v< t then n: =n+1; if r3/v< t then n: =n+1; if n> 1 then writeln('спасутся все') else if n> 0 then writeln('спасется половина пассажиров') else writeln('никто не спасется') end.
Популярно: Информатика
-
ира101404.08.2020 16:25
-
Катюшка31100119.06.2021 07:35
-
Генгстер15.04.2023 17:20
-
мурад200801.06.2022 09:30
-
romsik199920.03.2020 18:24
-
Арабика127.08.2020 10:07
-
misszephir2505.10.2022 02:39
-
yana365726.07.2020 04:15
-
sergei19906.04.2021 16:47
-
lerosabi08.06.2023 10:02