Создать массив из 15 натуральных чисел с датчика случайных чисел и все элементы массива которые меньше десяти увеличить вдвое в интервале от 1 до 20. вывести созданный массив и результат
226
360
Ответы на вопрос:
Var a: array[1..15] of integer; i: integer; begin for i: = 1 to 15 do begin a[i]: =random(20)+1; write(a[i],' ') end; writeln; for i: = 1 to 15 do begin if a[i]< 10 then a[i]: =a[i]*2; write(a[i],' ') end; end.
Популярно: Информатика
-
kmidakova31.05.2021 15:02
-
Znatokiys24.06.2023 14:05
-
GabriellaKiM01.10.2021 16:43
-
Kseniyak0413.10.2022 13:12
-
Anastasia555563326.06.2023 06:38
-
osama95w08.05.2021 23:49
-
vika1308200113.03.2022 06:15
-
ldudin17.01.2022 19:26
-
Аннабель0Свит18.10.2022 07:17
-
jdzhafarova25.01.2021 22:14