Ответы на вопрос:
Program gt; var i,max,min: integer; a: array[1..15]of integer; begin for i: =1 to 15 do read(a[i]); max: =a[1]; min: =a[1]; for i: =1 to 15 do begin if(a[i]> max)then max: =a[i]; if(a[i]< min)then min: =a[i]; end; writeln(min,' ',max); end.
Популярно: Информатика
-
Kamillka00527.01.2023 21:06
-
Bogdan150027.04.2023 13:19
-
tati986040617.12.2021 06:38
-
KageyamaT02.03.2022 10:19
-
marina20081020.09.2020 21:52
-
PolinaКэт08.04.2023 15:40
-
Lolololololololol428.06.2020 09:55
-
alinasastun013.06.2022 06:09
-
alina2033219.12.2020 21:58
-
anghelina110.04.2022 17:38