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

Задание 1. Использование условного оператора

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

  1. Запустите QBasic.

  2. Наберите текст программы:

REM Нахождение значения функции

CLS

INPUT “Введите значение переменной х”; x

IF x < 0 THEN

y = x^2

ELSE

y = 3 * EXP(– x)

END IF

PRINT “y=”; y

  1. Запустите программу на выполнение при разных значениях переменной .

  2. Ознакомьтесь с результатами.

  3. Сохраните программу на диске под именем USLOV_1.

Задание 2. Нахождение максимума двух чисел

Найти максимум двух чисел a и b.

  1. Запустите QBasic.

  2. В окне редактирования наберите текст программы:

REM Нахождение максимума двух чисел

CLS

INPUT “Введите значение первого числа a”; a

INPUT “Введите значение второго числа b”; b

IF a >= b THEN

max = a

ELSE

max = b

END IF

PRINT “Максимум двух чисел равен ”; max

  1. Запустите программу на выполнение.

  2. Протестируйте программу при некоторых значениях переменных a и b.

  3. Сохраните программу на диске под именем USLOV_2.

Задание 3. Проверка числа на делимость

Составьте программу, выясняющую, является ли натуральное число K делителем числа N.

Число k является делителем числа n тогда и только тогда, когда n делится на k без остатка. Поэтому условием делимости является равенство остатка от деления нулю, т.е. выполнение условия n MOD k = 0.

  1. Запустите QBasic.

  2. В окне редактирования наберите текст программы:

REM Проверка на делимость

CLS

INPUT “Введите значение числа n”; n

INPUT “Введите значение числа k”; k

IF n MOD k = 0 THEN

PRINT “Число k является делителем числа n“

ELSE

PRINT “Число k не является делителем числа n “

END IF

  1. Запустите программу на выполнение.

  2. Протестируйте программу при некоторых значениях переменных a и b.

  3. Сохраните программу на диске под именем USLOV_3.

Задание 4. Решение задач с использованием условного оператора

Самостоятельно решите задачу из Таблицы 3, выбрав вариант, совпадающий с номером компьютера. Сохраните программу на диске под именем USLOV_4.

Табл.3

варианта

Условие

Исходные данные

1

Ввести с клавиатуры три действительных числа a, b, c. Вывести на экран из них те, которые принадлежат интервалу (1, 10).

a, b, c

2

Ввести с клавиатуры два числа a, b. Если сумма этих чисел больше 30, то переменной с присвоить значение разности ab, иначе произведения a*b. Вывести с на экран.

a, b

3

Ввести с клавиатуры два числа a, b. Если сумма этих чисел меньше 24, то переменной с присвоить значение разности a * b, иначе удвоенной суммы этих чисел. Вывести с на экран.

a, b

4

Найти максимум трех чисел a, b, c.

a, b, c

5

Найти минимум трех чисел a, b, c.

a, b, c

6

Ввести с клавиатуры два числа a, b. Меньшее заменить квадратом, а большее уменьшить на 1. Результаты вывести на экран.

a, b

7

Ввести с клавиатуры два числа a, b. Меньшее утроить, а большее заменить 0. Результаты вывести на экран.

a, b

8

Ввести с клавиатуры два числа a, b. Меньшее заменить полусуммой, а большее – удвоенным произведением. Результаты вывести на экран.

a, b

9

Ввести с клавиатуры два числа a, b. Меньшее заменить большим, а большее – своим квадратом. Результаты вывести на экран.

a, b

10

Проверьте, делится ли введенное с клавиатуры число х на 5 и на 7

х

11

Проверьте, делится ли введенное с клавиатуры число х на 7 и на 11

х

12

Проверьте, делится ли введенное с клавиатуры число х на 2 и на 3

х

13

Проверьте, делится ли введенное с клавиатуры число х на 2, на 3 и на 5

х

14

Проверьте, делится ли введенное с клавиатуры число х на 3, на 5 и на 11

х

15

Проверьте, делится ли введенное с клавиатуры число х на 2, на 3 и на 11

х