69

Дан массив целых чисел А (10). Все нечетные элементы удвоить.

22 февраля 2023

Дан массив целых чисел А (10). Все нечетные элементы удвоить.

категория: информатика



61

const n=10; var a: array[1… n] of integer; i: byte; begin for i: =1 to n do begin a[i]: =random (20); write (a[i], '); end; writeln; for i: =1 to n do begin if (a[i] mod 2 <> 0) then a[i]: =a[i]*2; write (a[i], '); end; end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...