Составители:
92
90 PRINT S
100 END
Контрольный счет:
m=13 S=1.002768;
m=45 S=1.0547
Пример 11.6.8
Дано действительное число а.
Найти среди чисел
3
1
2
1
1,
2
1
1,1 +++
и т.д. пер-
вое большее а.
10 REM "НАХОЖДЕНИЕ ЭЛЕМЕНТА"
20 INPUT A
30 I = 1
40 S = 0
50 S = S + 1/I
60 I = I + 1
70 IF S > A THEN 80 ELSE 50
80 PRINT S
90 END
Цикл с параметром реализуется с помощью операторов цикла со
счетчиком:
FOR счетчик = начало TO конец [STEP приращение]
блок операторов
NEXT счетчик
Пример 11.6.9 Вычислить (для данного n) n!.
10 REM"Вычисление факториала"
20 INPUT N
30 P = 1
40 FOR I = 1 TO N
50 P = P * I
60 NEXT I
70 PRINT P
80 END
Пример 11.6.10 Вычислить значение функции
y=4x
3
-2x
2
+5 для значений х, изменяющихся от -3 до
1 с шагом 0,1.
10 REM "Вычисл. значения функции"
20 FOR X = -3 TO 1 STEP .1
30 Y = Y * X ^ 3 - 2 * X ^ 2 + 5
40 PRINT Y
50 NEXT X
60 END
Да
S>A
Нет
начало
A
I:=1
S
конец
S:=0
S:=S+1/I
I:=I+1
начало
N
P
конец
P:=1
P:=P•I
I=1,N;1
начало
конец
y:=4x
3
-2x
2
+5
x=-3,1;0.1
x, y
92
90 PRINT S
100 END
Контрольный счет:
m=13 S=1.002768; начало
m=45 S=1.0547 A
Пример 11.6.8 Дано действительное число а. I:=1
1 1 1
Найти среди чисел 1, 1 + , 1 + + и т.д. пер- S:=0
2 2 3
вое большее а.
10 REM "НАХОЖДЕНИЕ ЭЛЕМЕНТА" S:=S+1/I
20 INPUT A
30 I = 1 I:=I+1
40 S = 0 Да Нет
50 S = S + 1/I S>A
60 I = I + 1
70 IF S > A THEN 80 ELSE 50
S
80 PRINT S
90 END конец
Цикл с параметром реализуется с помощью операторов цикла со
счетчиком:
FOR счетчик = начало TO конец [STEP приращение] начало
блок операторов
N
NEXT счетчик
Пример 11.6.9 Вычислить (для данного n) n!.
P:=1
10 REM"Вычисление факториала"
20 INPUT N
I=1,N;1
30 P = 1
40 FOR I = 1 TO N P:=P•I
50 P = P * I
60 NEXT I
70 PRINT P P
80 END
начало конец
Пример 11.6.10 Вычислить значение функции
y=4x3-2x2+5 для значений х, изменяющихся от -3 до
x=-3,1;0.1
1 с шагом 0,1.
y:=4x3-2x2+5 10 REM "Вычисл. значения функции"
20 FOR X = -3 TO 1 STEP .1
x, y 30 Y = Y * X ^ 3 - 2 * X ^ 2 + 5
40 PRINT Y
50 NEXT X
конец 60 END
Страницы
- « первая
- ‹ предыдущая
- …
- 90
- 91
- 92
- 93
- 94
- …
- следующая ›
- последняя »
