Общие сведения об языке программирования QbasicРефераты >> Программирование и компьютеры >> Общие сведения об языке программирования Qbasic
Общий вид оператора цикла со счетчиком:
FOR K=K1 TO K2 STEP K3 - заголовок цикла
- тело цикла -
NEXT K - конец цикла
Здесь FOR - имя оператора (переводится "для"); К - переменная (обычно целого типа), называемая переменная управления циклом ; К1, К2, К3 - начальное, конечное значения и шаг изменения величины К соответственно, могут быть представлены любыми арифметическими выражениями; ТО, SТЕР - переводится - "до", "шаг"; тело цикла - любые операторы языка Бейсик; NEXT - оператор (переводится "следующий").
Совместная работа операторов и определяется схемой:
где
K < K2, если K3 > 0
< условие > = <
K > K2 ,если K3 < 0
Иначе говоря, операторы FOR и NEXT обеспечивают изменение значения К от К1 до К2 с шагом К3 и выполнение оператора (операторов), заключенных между FOR и NEXT, при каждом значении К.
Ограничения:
1. Изменять значение величин К1, К2, К3 в процессе выполнения операторов FOR и NEXT не рекомендуется.
2. Вход в цикл, минуя оператор FOR, в Бейсике запрещен.
Примеры решения задач
Пример 1. Выведите на экран в столбик целые числа от 1 до 10.
CLS
FOR J=1 TO 10 STEP 1
PRINT J
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=2X2-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
END
ЦиклWHILE . WEND (ПОКА . КОНЕЦ)
Конструкция WHILE . WEND (ПОКА . КОНЕЦ) позволяет выполнять блок команд до тех пор, пока значение выражения, заданного в WHILE - "Истина".
Общий вид оператора
WHILE логическое выражение
-- блок команд –
WEND
Работа операторов может определяться следующей схемой:
НЕТ
ДА
После завершения цикла управление передается команде, следующей за WEND.
Если при проверке условия окажется, что значение логического выражения - "Ложь", блок команд не будет выполнен ни разу.
С помощью WHILE . WEND можно организовать вложенные циклы - каждый со своими WHILE . WEND.
Ограничение: из этой конструкции нельзя выйти "досрочно", т.е. до завершения работы оператора.
Примеры решения задач.
CLS : I=1
WHILE I < 5
PRINT "I=" ; I;
I=I+1
WEND
На экране будет : I=1 I=2 I=3 I=4
Задачи по теме "Условный оператор" и "Оператор цикла"
1.Найти наибольшее из чисел (х+у)/2 и (х+у/2)для любых чисел х и у.
2. Вычислить значения функций для любых Х и Z
а)Y= (X-15)/(x-6) ; б) Y= 2X-5/(7Z-4X);
X2+5X-14, если X<-2
с) Y= <
3X2-7X , если X>=-2
г) 5X2+4X-21 , если X < -7
Y=<
2X2-3X , если X>=-7
д) X+Z , если X<10 и Z>5
Y= X*Z в остальных случаях
3. Заданы длины сторон треугольника - А, В, С, Определить, является ли треугольник равнобедренным.
4. Составить программу, выводящую на экран первые десять натуральных чисел.
5. Составить программу, печатающую таблицу квадратов первых десяти целых чисел в центре чистого экрана.
6. Вычислить значения функции
а) Y= 5*X2 -4X+11 на отрезке (-5,5) с шагом 1,5;
б) X2-2*X+3, если X<0
Y= < на отрезке (-7, 7) с шагом 1;
X-18+12, если X>=0
в) SIN(X), если X<=0
Y= < SIN(X)+COS(X), если 0<X<3
COS(X), если X>=3;
на отрезке (-6, 6) с шагом 0,5.
7. Выведите в столбик ряд натуральных чисел от 1 до 10.
8. Выведите на экран в столбик четные числа от 1 до 20.