Помогите пожалуйста с информатикой!!!
Составьте программу для нахождения суммы и количество положительных элементов массива,заполненного случайными числами интервала [-20,10].
Помогите пожалуйста с информатикой.
Ответы
Ответ дал:
0
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Матем ИЗ "...ОтделыОбмен";
ПЕР
массив: РЯД 100 ИЗ ЦЕЛ;
сч, сум, кол: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 30)) - 20
КОН;
сум := 0; кол := 0;
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
ЕСЛИ массив[сч] > 0 ТО
УВЕЛИЧИТЬ(кол); УВЕЛИЧИТЬ(сум, массив[сч])
КОН
КОН
КОН Задание.
ИСПОЛЬЗУЕТ Матем ИЗ "...ОтделыОбмен";
ПЕР
массив: РЯД 100 ИЗ ЦЕЛ;
сч, сум, кол: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 30)) - 20
КОН;
сум := 0; кол := 0;
ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
ЕСЛИ массив[сч] > 0 ТО
УВЕЛИЧИТЬ(кол); УВЕЛИЧИТЬ(сум, массив[сч])
КОН
КОН
КОН Задание.
Вас заинтересует
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад