Операторы цикла

Укажите, какое значение получит S после выполнения следующих операторов

жүктеу/скачать 135,71 Kb.

бет	4/4
Дата	09.11.2022
өлшемі	135,71 Kb.
	#48803

1 2 3 4

Байланысты:
ОПЕРАТОРЫ ЦИКЛА

10. Укажите, какое значение получит S после выполнения следующих операторов:
S=0; i=0
WHILE i<5
i=i+1: S=S+i;
WEND
11. Укажите, какое значение получит S после выполнения следующих операторов:
S=0; i=1
DO WHILE i>1
i=i+1: S=S+i;
LOOP
12. Укажите правильную конструкцию оператора цикла с предусловием:
- WHILE DO …LOOP
- DO UNTIL …LOOP
- UNTIL DO …LOOP
- REPEAT UNTIL FALSE…LOOP
- WHILE TO DO …LOOP

Таблица 1 – Варианты заданий

Вариант	Формула	Условие	Исходные данные
1	2	3	4	4
1.		1 t  2 t < 1 t > 2	a=-0.5 b=2
2.		x < 1.3 x = 1.3 x > 1.3	a=1.5
3.		x <1.2 x = 1.2 x >1.2	a=2.8 b=-0.3 c=4
4.		x<1.4 x=1.4 x>1.4	a=1.65
5.		x<1 x=1 1x>2	a=2.3
6.	т	x > a x = a x < a	a=2.5
7.		bx > 1 bx = 1 bx < 1	b=1.5
8.		x > 3.5 x 3.5	-
9.		x > 1 x 1	a=20.3
10.		x < 0.5 x = 0.5 x > 0.5	t=2.2
11.		x < 2.8 2.8x < 6 x6	a=2.6 b=-0.39
12.		x > 1 x 1	a=0.9
13.		i < 4 4  i  6 I > 6	a=2.1 b=1.8 c=-20.5
14.			a=0.3 n=10
15.		t < 0.1 t = 0.1 t > 0.1	a=2.5 b=0.4

Пример выполнения лабораторной работы № 2
Вычислить на ПК значение функции

Переменная X меняет свои значения в диапазоне [3, 6] с шагом 0.25.
Осуществить вывод значений вводимой исходной данной (X) и результат вычисления значения функции Y, сопровождая вывод наименованиями переменных.
Описание входных/выходных данных

Идентификатор	Тип	Назначения	Описание
xn	Single	Входная величина	Начальное значение аргумента
xk	Single	Входная величина	Конечное значение аргумента
dx	Single	Входная величина	Шаг изменения аргумента
t	String	Выходная величина	Вывод поясняющего значения
i, n	Integer	Вспомогательные величины	Для промежуточных вычислений
y	Single	Выходная величина	Значение функции

Алгоритм решения
1. Вводим значение переменной хn с клавиатуры.
2. Вводим значение переменной хk с клавиатуры.
3. Вводим значение переменной dх с клавиатуры.
4. Рассчитываем значение переменной n.
5. Вычисляем значение функции y, согласно условиям:

6. Выводим в таблицу значения xn, y,t.
7. Увеличиваем значение переменной xn на величину шага: xn = xn+dx. Если i <=n, тогда переходим к шагу 5, иначе Конец.

Представим данный алгоритм в графическом виде:

Рисунок 2.1 Алгоритм решения задачи

На рисунке 2.2 показана форма задачи в режиме выполнения.

Рисунок 2.2 Форма задачи в среде Visual Basic

Значения свойств объектов

Название объекта	Свойство	Значение
Form1	Name	Form1
	Caption	Расчет значений функции Y
	WindowState	2-Maximized
Label1	Caption	Введите начальное значение переменной x
Label2	Caption	Введите конечное значение переменной x
Label3	Caption	Введите шаг изменения переменной x
Label4	Caption	Если x <=5 тогда y = Cos(x)
Label5	Caption	Если x >5 тогда y = Sin(x)
Command1	Name	Command1
Command1	Caption	Расчет
Command2	Name	Command2
Command2	Caption	Выход
MSFlexGrid1	Name	Flex1
	Cols	4
	Visible	False

Листинг программы

Imports System.Math

Public Class Form1
Dim xn As Single, xk As Single, dx As Single, n As Integer, t As String, i As Integer, y As Single

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

xn = TextBox1.Text
xk = TextBox2.Text
dx = TextBox3.Text
n = (xk - xn) / dx
TextBox4.Text = n
DataGridView1.RowCount = n + 1
DataGridView1.ColumnCount = 4

DataGridView1.Rows(0).Cells(0).Value = "№"

DataGridView1.Rows(0).Cells(1).Value = "x"
DataGridView1.Rows(0).Cells(2).Value = "y"
DataGridView1.Rows(0).Cells(3).Value = "Формула расчета"

For i = 1 To n

If xn > 5 Then y = Sin(xn) : t = "y=sinx"
If xn < 5 Or xn = 5 Then y = Cos(xn) : t = "y=cosx"
DataGridView1.Rows(i).Cells(0).Value = i
DataGridView1.Rows(i).Cells(1).Value = xn
DataGridView1.Rows(i).Cells(2).Value = y
DataGridView1.Rows(i).Cells(3).Value = t
xn = xn + dx
Next i

End Sub

жүктеу/скачать 135,71 Kb.

Достарыңызбен бөлісу:

1 2 3 4