Дан массив а с количеством элементов n< =10 (элементы вводить с клавиатуры).найдите сумму элементов этого массива , которые расположены между макс и мин элементами массива. заранее )
221
372
Ответы на вопрос:
Вместо слов тип укажешь real если массив действительных чисел или integer - если целые числа var a: array[1..10] of тип i,n: integer; max, min, sum: тип begin write('введите количество элементов массива'); readln(n); for i: =1 to n do read(a[i]); max: =a[1]; min: =a[1]; for i: =2 to n do if a[i]> max then max: =a[i]; for i: =2 to n do if a[i]> min then min: =a[i]; sum: =0; for i: =1 to n do if (a[i]> min) and (a[i]< max) then sum: = sum+a[i]; write('сумма элементов массива расположенных между максимальным и минимальным = ', sum); end.
Readln(d); оператор, который считывает число d.вероятно, тут нужно указать некоторое число d, при котором алгоритм выводит некоторый результат.посмотрите более внимательно.
Популярно: Информатика
-
ksysharoma12325.12.2020 22:37
-
Кричащийёж06.02.2023 16:23
-
alexaFat22.07.2022 02:27
-
DianaHreseva24.01.2022 06:01
-
Polinakuzmina3206.08.2021 15:50
-
katyaadushkina300622.07.2021 04:45
-
13032005mahri27.07.2022 06:12
-
tania7po17.04.2023 15:45
-
Maksim20031617.05.2022 15:27
-
emilgasanov03.02.2021 16:18