Найти произведение чисел от 6.7 до 7.9 с шагом 0.4 ** языке Паскаль

Question

Найти произведение чисел от 6.7 до 7.9 с шагом 0.4 на языке Паскаль

Answer 1

Var I,m,Z,X,y:real; Begin X:=6.7; Y:=7.9; M:=0.4; Z:=1; For i:= x to y do Begin I:=i+m; Z:=z*i;End;Writeln(z);End.

Comments

Var
I,m,Z,X,y:real;
Begin
X:=6.7;
Y:=7.9;
M:=0.4;
Z:=1;
For i:= x to y do
Begin
I:=i+m;
Z:=z*i;
End;
Writeln(z);
End.

---

Вместо х,у,м можно поставить любые числа.