Н,И_Лаб_раб. 1сем_Pascal / Образец оформления отчета по лабораторной работе

Образец оформления лабораторной работы

Балтийский государственный технический университет “Военмех”

Лабораторная работа №.. Тема:……………………………….

Студент Иванов А. С. Группа Н - 000

Санкт-Петербург 2009

Задача.

Дано натуральное число N (вводится с клавиатуры), найти и вывести на экран монитора все делители этого числа.

Блок-схема:

Листинг программы:

Program main;

var

n, x: integer;

begin

writeln('введите n');

readln(n);

while n < 0 do

begin

writeln( 'error');

writeln(' введите новое n ');

readln(n);

end;

writeln(' Делители числа',n, ':');

for x:=1 to n div 2 do

if n mod x = 0 then writeln( x);

end

Результаты работы программ:

N	Делители
	Должно быть	Получено
18	1 2 3 6 9 18	1 2 3 6 9 18
-10	Error	Error
125	1 5 25 125	1 5 25 125

Вывод: программа работает правильно.