Составить алгоритм и программку: вывести на экран числа по формуле а:=

program zz1;
var i, n:integer; // задаем переменные целого типа
begin

for i:=1 to 50 do // организуем цикл, в котором переберем все числа от единицы до пятидесяти
begin
n:=4 * i + 1; // вычисляем значение по данной формуле
writeln( для , i, вычисленное значение = , n); // выводим ответ в столбец
end;
end.