Для массива чисел А1А2...Аn элементы, стоящие на четных местах разделить на 3, а стоящие на нечетных умножить на 2

Есть ответ
17.12.2022
140

Ответ


Не написана среда программирования, пишу на qbasic

CLSINPUT nDIM a(n)FOR i = 1 TO n INPUT a(i)NEXT iFOR i = 1 TO n IF i MOD 2 > 0 THEN a(i) = a(i) * 2 ELSE a(i) = INT(a(i) / 3) END IFNEXT iPRINTFOR i = 1 TO n PRINT a(i);NEXT i

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.