вычислить множество значений функции y=Mx+C, при M=0,85; C=23,4; x 5, 10, 15, ...50

m:= 0.85
c:= 23.4
For i:= 1 to 10 do
Begin
     a:= m*(I*5) + c;
     WriteLn(a);
End;