Задача на Паскаль

[WitaliG]

Здравствуйте!
Решаю задачи на тему «Цикл с параметром», но не могу понять как работает цикл.
Братцы растолкуйте поподробнее на примере следующей задачи:
For12°. Дано целое число N (>0). Найти произведение 1.1 • 1.2 • 1.3 •...(N сомножителей).
Моя программа считает неправильный результат:
var
a,p :real; {а – переменная для сомножителей, р – переменная для произведения}
i :integer;
begin
readln(a);
p :=1;
for i := 1 to 10 do
p :=p * (a + 0.1); writeln(p:5:2); read end.
Не соображу как написать тело цикла. А спросить, кроме как на Вашем форуме не у кого.
С уважением Виталий.

[newStudent]

var
p,a : real;
i,n : integer;
begin
readln(n);
p := 1;
i := 1;
a := 0.1;
while (i<=n) do
begin
p := p * (1 + a);
a := a + 0.1;
i := i + 1;
end;
writeln(p:5:2);
read
end.

[kitty19]

Если сомножителей N а р результат (шаг 0.1 начиная с 1.1) то будет так

var
N,i:integer;
p :real;
begin
readln(N);
p :=1;
for i := 1 to N do
p :=p * (1 + 0.1*i); 
writeln(p:5:2); 
read; 
end.

[WitaliG]

Спасибо, красивый код, правильно считает. Но возник вопрос:
р - обьявлена переменная вещественного типа, а потом ей вдруг присвоено целое число. Как это обьяснить?!

[newStudent]

Идет преобразование целого числа в вещественное число

[kitty19]

А проблема то в чем?Если б наоборот было тогда понятно, а так паскаль воспримет p как 1.00

[WitaliG]

Спасибо братцы.