Вопрос по информатике:
Вывести программы в QBasic:
1). Даны целые числа K и N. Вывести N раз число K.
2). Даны два целых числа A и B. Найти произведение всех четных чисел от A до B включительно.
3). Даны два целых числа A и B. Найти сумму кубов всех нечетных чисел от A до B включительно.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 16.06.2017 07:49
- Информатика
- remove_red_eye 11269
- thumb_up 34
Ответы и объяснения 1
CLS
INPUT "k=", k
INPUT "n=", n
FOR i = 1 TO n
PRINT k;
NEXT i
Тестовое решение:
k=152
n=12
152 152 152 152 152 152 152 152 152 152 152 152
CLS
INPUT "a,b=", a, b
p = 1
FOR i = a TO b
IF i MOD 2 = 0 THEN p = p * i
NEXT i
PRINT p
Тестовое решение:
a,b=7,14
13440
CLS
INPUT "a,b=", a, b
s = 0
FOR i = a TO b
IF i MOD 2 = 1 THEN s = s + i ^ 3
NEXT i
PRINT s
Тестовое решение:
a,b=4,10
1197
- 17.06.2017 01:29
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.