Напишите класс, который принимает с клавиатуры целое число и выводит на экран 25 последующих нечетных чисел

Program qq;
uses crt;
var a,b,c,d:real;
begin
read (a);
c:=a+1;
writeln (c);
d:=a+2;
writeln (d);
и тд и тп)