Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
261.doc
Скачиваний:
5
Добавлен:
01.07.2025
Размер:
2 Мб
Скачать
☆

Варианты заданий

Вариант

Формула

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

1

2

3

1

2

3

а = 2,8

b = 0,3

c = 4

4

a = 2,8

b = 0,3

c = 4

5

a = 1,8

b = 0,4

6

Продолжение

1

2

3

7

a = 1,5

8

a = 2,5

9

Q=

b = 1,5

10

11

a = 2,1

b = 1,8

c = 20,5

12

a = 2,6

b = 0,39

13

u = 1,3

14

y

a = 1,5

Окончание

15

A = 2,6

b = 0,39

Задание2

  1. Составить программу вычисления корней квадратного уравнения =0. Если , то корни действительные и необходимо вычислить . Если d<0, то корни мнимые и необходимо вычислить .

  2. Составить программу определения попадает ли точка с координатами х, у в круг радиуса r2 (r2 = x2 + y2). Вывести признак N = 1 если точка внутри круга, N = 0  если вне круга.

  3. Составить программу определения, является ли значение целочисленной переменной Х кратной 3. Если является, то вывести значение «Да», если нет, то вывеси значение «Нет».

  4. Даны 2 переменные х и у. Если х = у, то вывести на печать значения переменных без изменения . Если х = у, значения переменных без изменения. Если х > y значения переменных уменьшить в 2 раза, если х < y, то значения переменных увеличить на 10.

  5. Составить программу вычисления корней квадратного уравнения, учитывая, что любой из коэффициентов a, b, c может быть равен нулю.

  6. Составить программу сравнения возрастов 3-х сестер и напечатать возраст и имя самой старшей сестры.

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

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

  9. Найти квадрат наибольшего их 2-х чисел а и b и напечатать признак N = 1, если наибольшим является а и признак N = 2 – в противном случае.

  10. Вычислить площадь треугольника по формулам Герона, проверив условие корректности исходных данных(длины всех сторон положительны, сумма двух любых сторон должна быть больше третей.

  11. Известны размеры дома и участка, необходимо определить, можно ли поместить дом на этом участке.

  12. Дан круг радиуса R и квадрат со стороной А определить поместится ли круг в квадрате.

  13. Вычислить значение функции Z = X 3/Y, где Y = sin(nx)+0,5. Рассмотреть случай y = 0.

14. Составить программу, которая определяет, попадает ли точка в заштрихованный диапазон.

15.Упорядочить три числа a, b, c по возрастанию таким образом, чтобы переменной a соответствовало самое маленькое число, b среднее, c – наибольшее. Для решения последовательно сравниваются значения переменных а <= b, a <= c и b <= c. Если какое-либо условие выполняется, то осуществляется переход к следующему сравнению. В противном случае осуществляется перестановка значения соответствующих переменных, а затем переход к следующему сравнению. Для перестановки, например а и b используется вспомогательная переменная h. Перестановка осуществляется в такой последовательности h = a, a = b, b = h.

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

  1. Логические операции.

  2. Приоритет выполнения операций.

  3. Схемы алгоритмов разветвляющейся структуры.

  4. Условный оператор.

Лабораторная работа № 5

Программирование алгоритмов разветвляющейся

структуры оператором выбора CASE

Цель работы- овладение практическими навыками разработки и программирования вычислительного процесса разветвляющейся структуры оператором выбора CASE.

Теоретические сведения

Оператор CASE

Обычно при написании программы не рекомендуется использовать многократно вложенные друг в друга условные операторы if – программа становится громоздкой и ее трудно понимать. Считается, что число уровней вложения не должно превышать двух-трех. Но как быть, если необходимо проверить достаточно много условий и в зависимости от них выполнять те или иные действия? Для этих целей существует специальный оператор выбора case. Оператор выбора case является обобщением оператора if и позволяет сделать выбор из произвольного числа имеющихся вариантов. Как и в операторе if здесь может присутствовать слово else, имеющее тот же смысл.

Инструкция case имеет вид:

case <выражение -селектор> of

<список констант 1>: begin

<Инструкции 1;>

end;

<список констант 2>: begin

<Инструкции 2;>

end;

.................................

<список констант N>: begin

<Инструкции N;>

end

else

begin

<Инструкции>

end;

end;

Выполнение оператора case начинается с вычисления выражения – селектора. Инструкции между begin и end выполняются в том случае, если выражения после слова case совпадает с константой из соответствующего списка. Если это не так, то выполняются инструкции, идущие после else, расположенные между begin и end. Если else отсутствует, выполняется оператор программы, следующий за case.

Обратите внимание – в конце оператора case стоит ключевое слово end, для которого нет парного слова begin.

При использовании оператора варианта должны выполняться следующие правила: значение выражения, записанного после служебного слова Case, должно принадлежать дискретному типу; для целого типа они должны лежать в диапазоне – 32768 ... 32767.

Использование вещественного и строкового типа не допустимо.

Все константы, предшествующие операторам альтернатив, должны иметь тип, совместимый с типом выражения.

Все константы в альтернативах должны быть уникальны в пределах оператора варианта (то есть повторения констант в альтернативах не допускаются); диапазоны не должны пересекаться и не должны содержать констант, указанных в данной или других альтернативах.

Например:

  • селектор целочисленного типа: case i of

1:  z:=i+10;

2:  z:=i+100;

3:  z:=i+1000;

end;

  • селектор интервального типа:

case i of    1..10:  writeln(' Число ',i:4,' в диапазоне 1 – 10');    11..20:  writeln(' Число ',i:4,' в диапазоне 11 – 20');    21..30:  writeln(' Число ',i:4,' в диапазоне 21 – 30'); else   writeln(' Число вне диапазона '); end;