Ответы на вопрос:
Program mas; type mass=array[1..10] of integer; var m: mass; i,a: integer; begin for i: =1 to 10 do begin read(m[i]); end; a: =m[1]; for i: =2 to 10 do begin if a< m[i] then a: =m[i]; end; writeln(a); end. вот программа с вводом данных в массив и нахождение большего элемента в нём
Популярно: Информатика
-
murarr30.01.2023 20:58
-
dariaAppp19.02.2023 17:01
-
DisasterYt15.04.2021 20:18
-
oksana12ua24.12.2020 00:56
-
atapinalidia57703.09.2020 09:59
-
дншегзпгх19.08.2020 15:05
-
irinakotik201815.01.2020 12:09
-
MHEBCEPOBHO10.01.2023 15:22
-
nioniker25.02.2020 13:34
-
ДаняВетренный25.01.2023 11:58