Алгоритмические языки и программирование. Игошина Л.В. - 33 стр.

                            Writeln('   x= ',x:8:3,'     y= ',y:8:3);
                                 end;
    x:=x+H;
  Until x>B;             Readkey;{Ожидание нажатия любой клавиши}
  END.
                                Вариант 3
             Схема алгоритма с использованием цикла For ... Do
      Для организации цикла For необходимо сначала определить число
повторений цикла - n. Это можно сделать с помощью формулы:
n=(b-a)/h+1. При    программировании      необходимо      учитывать тип
переменных, участвующих в выражении. При вычислении значения n в
правой части формулы получается результат вещественного типа, а слева
стоит переменная целого типа, поэтому необходимо применить операцию
округления полученного значения n до целого значения получаемого в
результате операции деления. Для этого можно использовать стандартную
функцию Round.

                                               For
                 Начало                      i:=1 to n


                                        A
               Ввод                            6x2-x3                       Вывод
               a, b, h                          >0                          сооб-
                                                           нет              щения
                                              да

                                            Вычисление
          n=(b-a)/h+1                          F                            x := x+h


                                                                        A
                                             Вывод
               x := a
                                              F
                                                                             Конец




                         Текст программы
                      {Лабораторная работа 3}
      {Программирование циклов с использованием оператора FOR}