Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
10_praktich.doc
Скачиваний:
1
Добавлен:
01.03.2025
Размер:
430.59 Кб
Скачать

Лабораторная работа №6 Тема: Программная реализация несложного алгоритма

Задача №1: составить программу для вычисления значения функции по одной из формул

Программа:

CLS

REM Значение функции

INPUT «Введите a, b, k»; a, b, k

IF a<=-1 THEN y=k+a: goto 1 ELSE goto 2

2 IF (a>-1) AND (a<1) THEN y=SIN(a)-b: goto 1 ELSE y=ABS(1-a): goto 1

1 PRINT “y=”; y

END

Задача №2: составить программу для нахождения наименьшего из двух заданных неравных чисел отличных от нуля.

Программа:

CLS

REM Определение наименьшего числа

INPUT «Введите a, b»; a, b

IF a<b THEN PRINT “a– наименьшее”:goto 1 ELSE PRINT “b– наименьшее”:goto 1

1 END

Задание №6. Ответить на вопросы:

  1. Какая программа называется разветвляющейся?

называется такой алгоритм, в котором выбирается один из нескольких возможных вариантов вычислительного процесса. Каждый подобный путь называется ветвью алгоритма.

  1. Для чего предназначен оператор IF…THEN…ELSE в Qbasic?

для изменения порядка выполнения программы в зависимости от значения выражения, следующего за опцией IF.

  1. Для чего предназначен оператор GOTO в Qbasic?

предназначены для изменения порядка выполнения программы в зависимости от значения выражения, следующего за опцией IF

  1. Для чего предназначен оператор INPUT в Qbasic?

предназначен для ввода данных

  1. Какие данные являются исходными для задачи?

Лабораторная работа №7 Тема: Программная реализация несложного алгоритма

CLS

REM Произведение

y=0

FOR x=3 TO 99 STEP 3

y=y+x

NEXT x

PRINT “сумма y=”; y

END

цикл типа «ПОКА»

CLS

REM Произведение

y=0: x=3

WHILE x<=99

y=y+x

x=x+3

WEND

PRINT сумма y=”; y

END

цикл типа «ДО»

CLS

REM Сумма

INPUT «Введите x»; x

IF x=4 THEN GOTO 1 ELSE GOTO 2

2 S=0

FOR k=4 TO 12 STEP 1

S=S+x^2*(k+1)/(x-4)

NEXT k

z=31*x^2+5*S

PRINT “Сумма z=”; z

1: END

цикл типа «ПОКА»

CLS

REM Сумма

INPUT «Введите x»; x

IF x=4 THEN GOTO 1 ELSE GOTO 2

2 S=0: k=4

WHILE k<=12

S=S+x^2*(k+1)/(x-4)

k=k+1

WEND

z=31*x^2+5*S

PRINT “Сумма z=”; z

1: END

Задание №3. Ответить на вопросы:

  1. Какая программа называется циклической?

строятся при реализации циклических вычислительных процессов.

  1. Что указывается после оператора FOR в Qbasic?

READ

  1. Для чего предназначен оператор WEND в Qbasic?

предназначены для циклического повторения последовательности операторов до тех пор, пока заданное условие истинно.

  1. Как переводится оператор WHILE в Qbasic на русский язык?

Истина.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]