Вопрос по информатике:
Найдите ошибку в 7 строке(Qbasic) :
CLS
K = 0
DIM B(K)
INPUT N
FOR I = 1 TO N
INPUT A
IF A > 0 AND A MOD 3 = 0 THEN K=K+1 : B(K) = A
NEXT I
IF K > 0 THEN GOTO 10 ELSE GOTO 20
C = K
10 FOR D = C TO 1
PRINT B(K)
NEXT D
END
20 PRINT -1
END
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 01.04.2017 10:15
- Информатика
- remove_red_eye 14739
- thumb_up 18
Ответы и объяснения 1
CLS
K = 0
DIM B(10000)
INPUT N
FOR i = 1 TO N
INPUT A
IF A > 0 AND (A MOD 3) = 0 THEN K = K + 1: B(K) = A
NEXT i
IF K > 0 THEN GOTO 10 ELSE GOTO 20
10 :
C = K
FOR D = C TO 1 STEP -1
PRINT B(D)
NEXT D
END
20 :
PRINT -1
END
- 02.04.2017 01:46
- thumb_up 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.