Kadora
5 год назад
Напечатать на экране N различных целых чисел из интервала [1..99], используя функцию Random. Пожалуйста посчитайте срочно плиз!
ОТВЕТЫ
Григорий
Oct 24, 2020
Ну держи с функцией Random.
ЗАДАЧА Random(): ЦЕЛ;
УКАЗ
ВОЗВРАТ УЗК(ВШИРЦЕЛ(Матем.случ() * 98)) + 1
КОН Random;
ОТ сч := 1 ДО N ВЫП
Вывод.ЧЦел("%d ", Random(), 0, 0, 0)
КОН
ЗАДАЧА Random(): ЦЕЛ;
УКАЗ
ВОЗВРАТ УЗК(ВШИРЦЕЛ(Матем.случ() * 98)) + 1
КОН Random;
ОТ сч := 1 ДО N ВЫП
Вывод.ЧЦел("%d ", Random(), 0, 0, 0)
КОН
899
Смежные вопросы:
