program sad;

var
  c: array [1..15] of real;
  i: integer;

begin
  
  for i := 1 to 15 do
  begin
    c[i] := i * 1.5 + 1;
    writeln('c[', i, '] = ', c[i]);
  end;
end.