Визначити  силу  взаїмного  притягання  двох  тўл масами m ў m, якў
  знаходяться на вўдстанў R одне вўд другого (гравўтацўйна стала G).
   алг сила притягання (дўйсн m m R, G, F)
     aрг m m R, G
     рез F
   поч F:=(G*m *m )/R
   кўн
   10 REM сила притягання
   20 INPUT "ввести масу першого тўла";M1
   30 INPUT "ввести масу другого тўла";M2
   40 INPUT "ввести вўдстань мўж тўлами";R
   50 G=6.67 D-11
   60 F=(G*M1*M2)/R-2
   70 PRINT "сила притягання дорўвнюї";F
   80 END
                   Початок

                 m m R,G

                F:=(G*m *m )/R

                    F

                Кўнець