Завести в программе массив dot{любые 8 целых чисел от 1 до 100}. найти минимальный элемент массива и его номер и вывести его на экран.
230
456
Ответы на вопрос:
Паскаль var dot: array [1..8] of integer; i,max,maxi: integer; beginmax: =0; for i: =1 to 9 do // создание массиваreadln(a[i]); for i: =1 to 9 doif max< a[i] then // поиск максимальногоbegin max: =a[i]; maxi: =i; end; writeln(max," ",maxi); end;
Популярно: Информатика
-
jamashkinpavel30.11.2021 12:11
-
frolovaasd201710.03.2022 05:00
-
kiki5228.06.2023 10:54
-
Майнур123456789024.12.2021 07:35
-
AlilKris09.07.2022 10:17
-
sema6026.05.2021 22:43
-
valeraitrva01.09.2020 03:19
-
margusqw22.07.2022 07:29
-
рем210727.11.2021 08:30
-
gigi8125.09.2020 11:45