Реферат: Общие сведения о языке программирования Qbasic

NEXT J

END

Пример 2 . Вычислите сумму целых чисел от 1 до 10

CLS: S=0

FOR I=1 TO 10 STEP 1

S=S+I

NEXT I

PRINT " "; S

END

Пример 3. Вычислите значение функции y=2X² -3X+5 на отрезке (-3, 3) с шагом 1,5

CLS : PRINT "Y"; "X"

FOR X=-3 TO 3 STEP 1.5

Y=2*X^2-3*X+5

PRINT Y,X

NEXT X

END

Пример 4. Вычислите сумму S= 2+4+ ...+2 N , если Nвводится с клавиатуры CLS : S=0

INPUT «введите « N»; N

FOR I = 1 TO N

S=S + 2 *N

NEXT I

PRINT «сумма = «; S

END

Пример 5 Выведите слово«IBM» 10 раз, чтобы получилась диагональ

CLS

FOR K =5 TO 15

LOCATE K, K

PRINT « IBM»

NEXT K