Помогите решить задачу в Pascal.

[dangalah]

Определить время T, затрачиваемое на производство изделия, если цикл его производства состоит из неравных отрезков времени, образующих последовательность: P/(M-1), P/(M-2),....,P/(M-N), где M>N.

[Вадим Мошев]

var
	M, N, i: integer;
	P, T: real;
	
begin
	write('P = ');
	read(P);

	write('N = ');
	read(N);
	
	write('M = ');
	read(M);
	
	if M <= N then begin
		write('M должно быть больше, чем N');
		exit;
	end;
	
	T:=0;
	for i:=1 to N do begin
		T:=T + P / (M-i);
	end;
	
	write('T = ', T:5:5);	
	
end.

[dangalah]

Благодарю!)

[Вадим Мошев]

удачи .