Как вывести первую сотню чисел кратных семи, паскаль

Question

Как вывести первую сотню чисел кратных семи, паскаль

Answer 1

Var i : Integer;
Begin
  For i:=1 to 100 do Writeln(i*7);
end.