Дан одномерный массив n целых чисел. Заменить в данной последовательности чётные ??лементы на их удвоение.
?лементы на их удвоение.
Ответы:
09-11-2018 03:26
Const n = 10;Var m : array[1..n] of Integer; i : Integer;Begin Randomize; For i:=1 to n do Begin m[i]:=Random(50); Write(m[i]:3); end; Writeln; For i:=1 to n do Begin If not Odd(m[i]) then m[i]:=m[i]*2; Write(m[i]:3); end; Writeln;end.
Также наши пользователи интересуются:
ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ!!! Из одного города в другой, расстояние между которыми мен?Найдите произведениеи корней уравнения 36х-х^3=0
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Дан одномерный массив n целых чисел. Заменить в данной последовательности чётные ?» от пользователя Матвей Тучков в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!