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