Помогите пожалуйста работа в паскале составьте таблицу значений функции y=2x+5 с шагом 2

Вопрос школьника по предмету Информатика

Помогите пожалуйста
работа в паскале
составьте таблицу значений функции y=2x+5 с шагом 2

Ответ учителя по предмету Информатика

var  i, n, m: integer; 

H: boolean = true;

begin 

    Writeln(‘Начальное значение х должно быть меньше конечного иначе  программа не сработает!’); 

    write(‘Введите начальное значение х >>> ‘); 

    Read(n); 

    write(‘Введите конечное значение х >>> ‘);

    Read(m); 

    Writeln(‘====================================’); 

    for i := n to m do   

        if H = true then 

        begin   

            Writeln(‘x=’, i, ‘ y=’, 2 * i + 5);   

            h := false; 

        end 

        else   

        
    H := true;

end.