Напишите программу в паскале. в последовательности натуральных чисел вывести среднее арифметическое чисел, не оканчивающихся на 3 и на 5 , знаков после запятой 3 . на вход подается кол-во чисел, сами числа . значение числа не должно превышать 30000 , количество чисел не больше 1000
238
269
Ответы на вопрос:
Var a: array[1..100] of integer; min, minz, i: integer; begin randomize; minz: =30; for i: =1 to 10 do a[i]: =random(20)+1; for i: =1 to 10 do if minz> a[i] then begin minz: =a[i]; min: =i; end; for i: =1 to 10 do write(a[i],' '); writeln(); writeln(minz,' ',min); end.
Популярно: Информатика
-
cfxdcvbnm16.01.2022 03:05
-
adilukanova24.08.2021 21:33
-
PEWALWIK24.12.2022 14:05
-
anastasiyapinoнастя22.06.2021 19:11
-
Вероникапривет20.09.2022 11:25
-
cat252230.01.2021 13:13
-
korolevandrej4806.11.2021 00:34
-
Вова1234567891217.09.2021 11:57
-
L1O2N3D4O5N29.07.2022 21:10
-
Палина20041310.06.2021 15:25