Question

Можете написать задачу на Basic и составить блок-схему? Найти сумму целых четных чисел, расположенных между вводимыми с клавиатуры числами A и B. Заранее спасибо.

Answer 1

CLS
INPUT "a=", a
INPUT "b=", b
IF a MOD 2 <> 0 THEN a = a + 1 ELSE a = a + 2
s = 0
FOR i = a TO b - 1 STEP 2
   s = s + i
NEXT i
PRINT s
END

Тестовое решение:
a=5
b=18
 66

Чтобы продолжить, нажмите любую клавишу

Блок-схема во вложении.

Answer 2

Конечно, вот задача на Basic и блок-схема для поиска суммы целых четных чисел между числами A и B:

basicCopy code
10 INPUT "Введите число A: ", A
20 INPUT "Введите число B: ", B
30 IF A > B THEN
40   TEMP = A
50   A = B
60   B = TEMP
70 END IF
80 SUM = 0
90 FOR X = A TO B
100   IF X MOD 2 = 0 THEN
110     SUM = SUM + X
120   END IF
130 NEXT X
140 PRINT "Сумма четных чисел между ", A, " и ", B, " равна ", SUM
150 END

И вот блок-схема для этой программы:

lessCopy code
  +----------------------------------+
  |                                |
  |   Введите число A:             |
  |   ↓                            |
  |   Введите число B:             |
  |   ↓                            |
  |   A > B?                       |
  |   ↓                            |
  |   TEMP = A                     |
  |   A = B                        |
  |   B = TEMP                     |
  |   ↓                            |
  |   SUM = 0                      |
  |   ↓                            |
  |   FOR X = A TO B               |
  |   ↓                            |
  |   X MOD 2 = 0?                 |
  |   ↓                            |
  |   SUM = SUM + X                |
  |   ↓                            |
  |   NEXT X                       |
  |   ↓                            |
  |   Вывести сумму                |
  |                                |
  +----------------------------------+

Эта программа сначала проверяет, какое из введенных чисел больше (A или B), и если A больше, то меняет их местами. Затем она инициализирует переменную SUM нулем и использует цикл FOR для перебора всех чисел от A до B. Если текущее число X четное (X MOD 2 = 0), оно добавляется к SUM. По завершении цикла программа выводит сумму четных чисел между A и B.