Ответы на вопрос:
Ятак полагаю, что это паскаль. через while будет попроще это сделать. var a,b: real; begin read(a); b: =a; while a< > 0 do begin read(a); if a> b then b: =a; end; writeln(b); end.
Популярно: Информатика
-
katerin815.03.2020 18:24
-
mishelmarriano09.03.2022 13:02
-
отличница47513.07.2021 07:32
-
надя65314.05.2022 04:47
-
frnkiero113332430.06.2020 14:43
-
Маруся20310.11.2022 01:08
-
spinny9tim18.12.2021 08:27
-
alinakolesnikov04.08.2022 09:21
-
drswag1231214.06.2021 16:03
-
pavlikpanov200oyp9mu10.02.2021 00:31