Составить программу, которая формирует массив, содержащий 15 случайных целых чисел, принадлежащий промежутку [0; 8], и преобразует элементы массива по следующему правилу: к чётному числу прибавляет 1, а нечётное умножает на 2.
207
344
Ответы на вопрос:
var i: integer; a: array [1..15] of integer;
begin write('исходный массив: '); for i: = 1 to 15 do //формируем и распечатываем массив begin a[i]: = random(8); write(a[i],' '); end; writeln; //перевод на новую строку write('преобразованный массив: '); for i: = 1 to 15 do begin if a[i] mod 2 = 0 then a[i]: = a[i] + 1 {если элемент массива с индексом i четный, то прибавляем к нему 1, иначе умножаем на 2} else a[i]: = a[i] * 2; write(a[i], ' '); end; writeln; {перевод на новую строку, чтобы при повторном запуске программы сформированный массив печатался на новой строке}end.
отметь решение, как лучшее )
1. 0.5 + (a * c) / ( 2 * b * d + 1) 2. sin(a) + cos(6) + *хз чо за d в [ ]* 3. ((a + b) ^ 2)/ (1 + 2 * d)
Популярно: Информатика
-
musinasim18.08.2022 03:19
-
REDUCE00708.01.2023 10:45
-
Лораншу21.06.2022 08:52
-
avatariyaflora16.05.2020 12:12
-
Мижоп26.03.2023 02:49
-
жизньпрекрасна223.05.2022 23:30
-
маруська6216.01.2021 06:17
-
сонка12345678925.01.2023 14:51
-
akhdogru30.06.2022 04:20
-
selbianaosmanov21.01.2022 17:43