Составление и отладка разветвленных программ

Страницы работы

Содержание работы

Практическая работа № 14.

Тема: Составление и отладка разветвленных программ.

Цель: Научиться составлять и отлаживать разветвленные программы на языке Basic.

Ход работы:

1.

CLS

REM                                              

INPUT “Введите Х”; X

IF X = 5 THEN PRINT ” МОЛОДЕЦ ”

IF X=4 THEN PRINT “ ХОРОШО ”

IF X <=3 THEN PRINT “ ЛЕНТЯЙ ”

END

2.

CLS

REM

INPUT “Введите  ЗНАЧЕНИЕ КООРДИНАТ ЦЕНТРА ОКРУЖНОСТИ A,B ”; A, B

INPUT “Введите  ЗНАЧЕНИЕ ТОЧКИ M (X;Y) ”; X,Y

INPUT “РАДИУС”; R

D =SQR (ABS(( X – A) ^ 2 – (Y – B) ^ 2))

IF D > R THEN PRINT ” ТОЧКА ЛЕЖИТ ЗА ОКРУЖНОСТЬЮ ”

IF D < R THEN PRINT “ТОЧКА ЛЕЖИТ В ОКРУЖНОСТИ ”

IF D = R THEN PRINT “ТОЧКА ЛЕЖИТ НА ОКРУЖНОСТИ ”

END

3.

CLS

REM

INPUT “Введите Х”; X

IF X MOD 2 = 0 THEN PRINT ” ЧЕТНОЕ ” ELSE PRINT ” НЕ ЧЕТНОЕ ”

END

4.

CLS

REM

1 INPUT A ,B, C 

IF A <> 0 THEN D = B ^ 2 – 4 * A * C

IF D < 0 THEN ? “ КОРНЕЙ НЕТ ”

IF D = 0 THEN ? “ ОДИН КОРЕНЬ ”: X = - B / 2 * A : PRINT X 

IF D > 0 THEN ? “ ДВА КОРНЯ ” X1 = (- B  + SQR ( D )) / ( 2 * A ) : X2 = (- B  - SQR ( D )) / ( 2 * A ): PRINT X1,X2

END

Домашняя работа.

1. CLS

INPUT x, b

IF x < 0 AND x MOD 2 = 0 THEN y = x ^ 2

IF x > 0 AND x MOD 2 = 0 THEN y = SQR(x + b) ELSE y = aqr(ABS(x ^ 3))

PRINT y

Контрольные вопросы.

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

Разветвляющаяся программа ─ это программе в которой присутствуют какие либо условия.

2. Виды условий. Как они записываются в программе?

Условия бывают Полные и неполные. Неполное условие – это условие в котором нет иного выполнение задачи, а полное, в котором присутствует иное выполнение.

if (проверка) then (требуемое выполнение) – неполное.

if (проверка) then (требуемое выполнение else (иное выполнение) – полное.

3. Как заполняется условный оператор?

if (проверка) then (требуемое выполнение else (иное выполнение).

Похожие материалы

Информация о работе

Предмет:
Информатика
Тип:
Отчеты по лабораторным работам
Размер файла:
82 Kb
Скачали:
0