Решить в паскале авс вывести на экран 10 случайных чисел из диапазона от 1 до 9 (включительно)
166
500
Ответы на вопрос:
Program qq; var a,i: integer; begin for i: =1 to 10 do begin a: =random(9)+1; writeln(a); end; end.
Популярно: Информатика
-
lesikviktoria4715.07.2020 01:20
-
prvvk31.12.2022 09:40
-
Варвараминнннн21.05.2023 09:44
-
igor228501.10.2020 04:46
-
Sashka606825.06.2022 03:49
-
никитапиунов23.06.2020 10:52
-
Amshvd16.04.2020 18:47
-
kristinaalekse126.06.2021 13:44
-
nastya403020.09.2022 22:30
-
Агентство1020304028.02.2022 06:45