Ответы на вопрос:
var i,max: integer; b: array[1..40] of integer; begin randomize; for i: =1 to 40 do begin b[i]: =random(random(; write(b[i],' '); end; writeln; max: =b[1]; for i: =1 to 40 do begin if b[i]> = max then begin max: =b[i]; end; end; writeln('максимальный элемент массива: ',max); end.
Популярно: Информатика
-
jauprosto01.03.2022 15:17
-
Gurusergo22.01.2023 20:08
-
жыландыыыы22.02.2022 21:17
-
Пикачу111111111129.10.2022 17:56
-
Олежик12131403.06.2023 03:20
-
muraitovaayana219.01.2021 17:29
-
nastyagru115.01.2021 09:00
-
PineappleRomka05.10.2022 07:26
-
elenakazimirov30.08.2020 13:03
-
Arianadrem19.07.2022 16:22