Помощь - Поиск - Пользователи - Календарь
Полная версия: Прошу помощи в составлении программы на QBasic > Информатика / Программирование
Образовательный студенческий форум > Другие дисциплины > Информатика / Программирование
FirsT
Задача. Организовать массив из 12 элементов, если элементы с четным индексом равны 1, с нечетным равны 2. Найти произведение элементов.
*Примечание:при этом допустимо использовать операторы: DIM(одномерный, двумерный),LET, READ-DATA, WHILE, FOR-TO-STEP-NEXT, GO TO, IF-THEN-ELSE, INPUT-PRINT.
Решение.
Dim x(12)
For i = 1 to 12
P = 1
x(i * 2) = 1
x((i * 2) +1) = 2
...
И тут возникает несколько вопросов. Что писать дальше? Правильно ли составлена программа на данном этапе? Спасибо.
С ув. FirsT.

Vahappaday
Dim x(12)
P = 1
For i = 1 to 6
x(i * 2) = 1
x((i * 2)-1) = 2
P=P*x(i*2)
P=P*x(i*2-1)
Next
Print P

Как-то так...
Все исправления понятны?
FirsT
Цитата(Vahappaday @ 12.5.2012, 22:02) *

Dim x(12)
P = 1
For i = 1 to 6
x(i * 2) = 1
x((i * 2)-1) = 2
P=P*x(i*2)
P=P*x(i*2-1)
Next
Print P

Как-то так...
Все исправления понятны?

Всё понятно, спасибо за помощь!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.
Русская версия Invision Power Board © 2001-2024 Invision Power Services, Inc.