Ответы на вопрос:
Const n=10; var i,b,max: integer; a: array [1..n] of integer; begin for i: =1 to n do begin a[i]: =random(1,50); end; writeln(a); max: =a[1]; for i: =1 to n do begin if max< a[i] then max: =a[i] end; writeln(a[1]); writeln(a); end.
Популярно: Информатика
-
катрин011125.12.2022 10:07
-
ntarakanov5310.02.2021 03:48
-
loooolg10.12.2022 07:44
-
Шиппер11115.07.2022 12:09
-
mariia170622.08.2021 07:06
-
cherrychampagne01.08.2022 23:47
-
Sanya311016.01.2020 04:58
-
5five335327.01.2022 19:17
-
Стас66622810.04.2021 23:22
-
vitakotov00909.11.2022 19:24