[pic]
Цель работы
Закрепить теоретические знания по работе разветвляющихся программ
Обеспечить усвоение порядка составления программ на языке Паскаль
Задание
Написать на языке Паскаль программу для следующей задачи:
Вычислить значения М и Х
[pic]
[pic]
Ввести программу в компьютер и отладить ее
Проверить правильность работы программы на тестовом примере
Приборы и оборудование
Персональный компьютер семейства IBM PC
Программное обеспечение персонального компьютера
Порядок выполнения работы
Составить программу по заданному условию
Ввести программу в компьютер
Исправить все ошибки
Запустить программу на выполнение
Задать исходные значения переменных и записать результат работы программы
Проверить правильность расчетов, используя тестовые примеры
Описать назначение всех используемых в программе операторов
Сделать вывод по работе
Ход работы
Текст программы:
program VETV;
var
A,B,C,X,M: real;
begin
Writeln('Введите A B C');
ReadLn(A,B,C);
X := Sqr(A)-4;
If X>0 then
M := 2*A-cos(b)/(c+1)
else
M := B-sqrt(b+5)/(2+sqr(a));
WriteLn('M= ',M:1:6, ' x=',X:2:6);
end.
Исходные данные (первый вариант) А=1 В=2 С=3
Результат работы программы (первый вариант)
М=_____________________X=___________________
Исходные данные (второй вариант) А=5.5 В=6.8 С=1
Результат работы программы (второй вариант)
М=_____________________X=___________________
Тестирование показало программа работает ________________________
правильно (неправильно)
В программе использованы следующие конструкции языка Паскаль:
program___________________________________________
var________________________________________________
integer____________________________________________
Real______________________________________________
Begin_____________________________________________
WriteLn___________________________________________
ReadLn ___________________________________________
:=________________________________________________
end_______________________________________________
Формат оператора условия имеет следующий вид:
__________________________________________________________________
Вывод
Закрепили теоретические знания по составлению разветвляющихся программ
Приобрели практические навыки по составлению разветвляющихся программ
04
Изм
Лист
№ докум.
Подп.
Дата
Разраб.
Составление разветвляющихся программ
Лит.
Лист
Листов
Пров.
НМК, -11
Н. контр.
Утв.