На рабочем столе размещаются небольшие картинки объектов: и (картинки с небольшими стрелочками в левом нижнем углу).
153
341
Ответы на вопрос:
1) var a: array[1..10] of integer; i: integer; begin randomize(); for i: =1 to 10 do begin a[i]: = 1+ random(10); write(a[i], ' '); if a[i] mod 2 = 0 then a[i]: =a[i] + 1; end; writeln(); for i: =1 to 10 do write(a[i], ' '); end. 2) var a: array[1..10] of integer; i: integer; begin randomize(); for i: =1 to 10 do begin a[i]: = 1+ random(10); write(a[i], ' '); if a[i] mod 2 < > 0 then a[i]: =a[i] * 3 else a[i]: = 0; end; writeln(); for i: =1 to 10 do write(a[i], ' '); end.
Популярно: Информатика
-
1lёn118.06.2020 06:15
-
lidiyavasilenkо10.03.2022 16:14
-
cheknutyi09.07.2020 14:04
-
sanyakryt29.07.2021 19:39
-
311242aaa01.09.2020 02:44
-
DashaP200602.02.2022 10:11
-
nastya274711.10.2021 20:38
-
abc7131.03.2020 12:46
-
рвовивовл09.10.2022 03:19
-
vlad126902.08.2022 11:42