Ответы на вопрос:
Общение. Языковое, устное. Происходит, существует, осваивается. Люди обмениваются информацией друг с другом. Знания.
Const n=30; var a: array[1..n] of integer; i: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin a[i]: =random(9000)+1000; write(a[i]: 5); end; writeln; for i: =1 to n do if a[i] mod i = 0 then a[i]: =1 else a[i]: =0; writeln('полученный массив: '); for i: =1 to n do write(a[i],' '); writeln; end. пример (для n=10): исходный массив: 2309 2867 6032 7114 7552 6798 8799 3607 2014 2876 полученный массив: 1 0 0 0 0 1 1 0 0 0
Популярно: Информатика
-
zanna1009197628.04.2022 15:50
-
Abbal15.08.2020 02:40
-
nekit322109.03.2022 01:16
-
natakhafedotovp06k9x15.05.2022 09:27
-
arkadikmxitary11.01.2022 23:56
-
нина1278915.04.2021 11:36
-
Julia2003311210.04.2022 18:26
-
weazelhubozcy1c05.02.2021 15:41
-
03alibek16.08.2022 09:56
-
даша364403.01.2023 13:01