Вопрос по информатике:
QUICKBASIC. Циклы
1. Вычислить и распечатать значения функции Y= A^2 + B^2 при одновременном
(синхронном) изменении величин А и В:
А = 2, 4, 6,…, 2М;
В = 5, 10, 15,…,5М, где М – любое натуральное число.
2. Найти и распечатать 15 первых простых чисел.
- 27.04.2016 22:47
- Информатика
- remove_red_eye 3258
- thumb_up 17
Ответы и объяснения 1
CLS
INPUT "M = ", M
FOR I = 1 TO M
A = 2 * I * I + 5 * I * I
PRINT I, "Y ="; A
NEXT I
----------------------------------------------------
CLS
K = 1
F = 1
N = 1
DO WHILE N < 16
Z = K - 1
DO WHILE Z > 1
IF K \ Z = K / Z THEN
F = 0
EXIT DO
ELSE
Z = Z - 1
END IF
LOOP
IF F = 1 THEN
PRINT N, K
N = N + 1
END IF
K = K + 1
F = 1
LOOP
- 28.04.2016 03:35
- thumb_up 6
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.