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