Определить значения s и i после выполнения фрагмента алгоритма s: =o i: = -3 пока i< 2 повторять нц если i< 0 то а: =i*i иначе а: =i-1 конец ветв s: =s+a i: =i+1 кц 1)s=0 i= -3 2)s=13 i=2 3)s=14 i=2 4)s=10 i=2 5)s=13 i=1
223
374
Ответы на вопрос:
Var a, max, i, n: integer; begin readln(a); n: =a-1; readln(a); max: =a; for i: =1 to n do begin readln(a); if a> max then max: =a; end; writeln(max); end.
Популярно: Информатика
-
skyline1234526.03.2023 01:43
-
marisha16803.05.2021 12:24
-
fynju15.04.2023 12:47
-
tatianani18.05.2022 22:01
-
Donyakotova04.07.2021 14:24
-
Dinka159704.07.2020 13:57
-
sashanatashakes30.11.2021 19:14
-
анна225913.12.2020 12:26
-
Верче0225.11.2021 07:15
-
Shkolnikt16.10.2020 09:09