[pic]
Цель работы
Закрепить теоретические знания по составление линейных программ
Приобрести практические навыки по составлению и отладке линейных программ
Задание
Написать на языке Паскаль программу для следующей задачи:
Ввести три двузначных числа целого типа. Найти среднее арифметическое этих чисел и вывести его с использованием формата по умолчанию и явно заданного формата
Ввести программу в компьютер и отладить ее
Проверить правильность работы программы на тестовом примере
Приборы и оборудование
Персональный компьютер семейства IBM PC
Программное обеспечение персонального компьютера
Порядок выполнения работы
Составить программу по заданному условию
Ввести программу в компьютер
Исправить все ошибки
Запустить программу на выполнение
Задать исходные значения переменных и записать результат работы программы
Проверить правильность расчетов, используя тестовый пример
Описать назначение всех используемых в программе операторов
Сделать вывод по работе
Ход работы
Текст программы:
program lin1;
var
a,b,c : integer;
d : real;
begin
WriteLn('Введите значения переменных A,B,C ');
ReadLn(a,b,c);
d := (a+b+c)/3;
WriteLn('d = ',d);
WriteLn('d = ',d:5:2);
end.
Исходные данные
a=__________________________b=______________________c=___________________
Тестовый пример:
Результат работы программы:
В программе использованы следующие конструкции языка Паскаль:
program - начало программы, объявляет имя программы,
var - объявляет раздел описания переменных___________
integer____________________________________________
Real______________________________________________
Begin_____________________________________________
WriteLn___________________________________________
ReadLn ___________________________________________
:=________________________________________________
end_______________________________________________
Вывод
Закрепили теоретические знания по составление линейных программ
Приобрели практические навыки по составлению линейных программ
03
Изм
Лист
№ докум.
Подп.
Дата
Разраб.
Составление линейных программ
Лит.
Лист
Листов
Пров.
НМК, -11
Н. контр.
Утв.