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

Задание 2

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

Указание к выполнению: перед составлением программы необходимо выполнить следующие этапы:

  1. Определить количество необходимых переменных, их имена и тип.

  2. Определить входные данные, область допустимых значений и способ их задания.

  3. Записать на Паскале заданное выражение.

  4. Определить выходные данные, формат вывода, способ вывода на экран.

  5. Определить заранее значение выражения при тестовых значениях входных данных.

Образец выполнения задания

Задание: вычислить значение выражения

  1. Для вычисления данного выражения мне потребуются переменные a,b и с, которые могут принимать любые вещественные значения, кроме a=0, тип переменных real. Для хранения результата вычислений мне потребуется переменная y, которая также будет вещественного типа, так как операндами выражения являются вещественные переменные, над которыми выполняются операции вещественного типа.

  2. Входными данными являются переменные a,b и c. Их значения должны быть заданы до начала вычисления выражения. Задавать значения переменных буду с клавиатуры с помощью процедуры readln().

  3. Искомое выражение на Паскале будет иметь вид: (b+sqrt(sqr(b)+4*a*c))/(2*a)-sqr(a)*a*c

  4. Выходными данными является переменная y. Вывод на экран осуществляется с помощью процедуры writeln(). Для наглядности и удобства восприятия результата задам формат вывода переменной: общая длина числа – 8, количество знаков после запятой – 4.

  5. Если задать значения переменных a=1, b=0, c=1, то значение выражения должно быть равно 0.0

Текст программы:

Program zadacha1 _2;

Var

A,b,c,y: real; {описываем переменные, используемые в программе}

Begin {начало основной программы}

Writeln(‘введите значение переменной a, не равное 0’);

Readln (a); {ввод с клавиатуры переменной а}

Writeln (‘введите значения переменных b и c через пробел’);

Readln (b,c); {ввод с клавиатуры переменных b,c}

Y:= (b+sqrt(sqr(b)+4*a*c))/(2*a)-sqr(a)*a*c; {вычисление значения выражения}

Writeln(‘значение искомого выражения равно’, y:8:4); {вывод результата на экран}

End.

Дальнейшие действия:

  • Откомпилировать программу (клавиша <F9>), исправить ошибки, допущенные при наборе.

  • Запустить программу на исполнение (сочетание клавиш <Ctrl>+<F9>).

  • Задать тестовые значения переменных. Посмотреть результат выполнения программы, нажав сочетание клавиш <Alt>+<F5>, оценить полученный результат.

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

Вариант 1

Вариант 2

Вариант 3

Вариант 4

Вариант 5

Вариант 6

Вариант 7

Вариант 8

Вариант 9

Вариант 10

Вариант 11

Вариант 12

Вариант 13

Вариант 14

Вариант 15

Задание 3

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

Указания к решению: перед составлением программы необходимо выполнить следующие этапы:

  1. Определить количество необходимых переменных, их имена и тип.

  2. Определить входные данные, область допустимых значений и способ их задания.

  3. Определить выходные данные, формат вывода, способ вывода на экран.

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

  5. Определить заранее значение выходных данных при тестовых значениях входных данных.

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