Для массива чисел А1А2…

Question

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

Answer 1

74

vikont

17 апреля 2023

Не написана среда программирования, пишу на qbasicCLSINPUT 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

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: