Организация циклов. Команды QBasic

1. Организация циклов

задачи
Учитель информатики МБОУ СОШ 39 города Рязани
Ермакова Евгения Викторовна

2. №1. Найти сумму и произведение первых 6 последовательных натуральных чисел.

начало
s := 0
p :=1
x = 1( 1 ) 6
s := s + x
p := p * x
Вывод s,p
конец
CLS
S=0
P=1
FOR x = 1 TO 6
s=s+x
p=p*x
NEXT x
PRINT “s=”s
PRINT “p=”p
END

3. №2. Найти сумму первых k последовательных нечетных чисел.

начало
s := 0
Ввод k
x=1(2)k
s := s + x
Вывод s
конец
Тест:
Ввод: k=7;
Вывод: S=16;
CLS
S=0
INPUT “k=“ k
FOR x = 1 TO k STEP 2
s=s+x
NEXT x
PRINT “s=”s
END

4. №3. Найти произведение последовательных натуральных чисел от n до m (n>m).

№3. Найти произведение последовательных
натуральных чисел от n до m (n>m).
начало
p := 1
Ввод n,m
x = n ( -1 ) m
p := p * x
Вывод p
конец
Тест:
Ввод: n=5; m=3;
Вывод: p=60
CLS
p=1
INPUT “n(n>m)=”; n
INPUT “m=”; m
FOR x = n TO m STEP -1
p=p*x
NEXT x
PRINT “p=”p
END

5. №4. Найти сумму последовательных натуральных чисел от 9 до 6.

начало
s := 0
x = 9 ( -1 ) 6
s := s + x
Вывод s
конец
Тест:
Вывод: s=30
CLS
s=0
FOR x = 9 TO 6
STEP -1
s=s+x
NEXT x
PRINT “s=”s
END

6. №5. Найти сумму и произведение первых a последовательных натуральных чисел.

начало
s := 0
p :=1
Ввод a
x = 1( 1 ) a
s := s + x
p := p * x
Вывод s,p
конец
Тест:
Ввод: a=4
Вывод: s=10; р=24;
CLS
S=0
Р=1
INPUT “a=”; a
FOR x = 1 TO a
s=s+x
р=р*x
NEXT x
PRINT “s=”s
PRINT “p=”p
END

7. Домашнее задание

1. Дорешать задачи 1-5.
2. Подготовиться к диктанту по командам
QBasic.