Создать программу которая вычислит результат функций
Начинается с y=

Вобработчике  onclick   кнопки "" пишем:       if  opendialog1.execute  then             memo1.lines.loadfromfile(opendialog1.filename); в результате выбора файла свойство  filename   компонента  opendialog   получает значение полного адреса выбранного файла, который мы и вставляем в функцию загрузки файла компонента  memo. всё это хорошо, но только в данном случае, когда записанное выражение записывается в одну строку. если программа использует несколько раз выражение  opendialog1.filename, то писать руками устанешь. в  delphi   для такого случая есть так называемый "оператор присоединения"  with. он используется для любых объектов, имеющих длинный "хвост" из свойств, которые приходится записывать многократно. вот как он записывается:       with  объект  do           begin           end; свойства объекта внутри логических скобок  begin/end   можно записывать непосредственно. допускается перечислять через запятую несколько объектов. естественно, в случае, когда внутри скобок находится один оператор, они необязательны. перепишем фрагмент загрузки файла с использованием оператора присоединения:       with  opendialog1, memo1  do             if  execute  then                   lines.loadfromfile(filename); запись получается более компактной. так как свойства компонентов  opendialog   и  savedialog   одинаковы, сохранение текста выглядит абсолютно аналогично. создаём обработчик нажатия кнопки "сохранить " и пишем:       with  savedialog1, memo1  do             if  execute  then                 begin                       lines.savetofile(filename);                       opendialog1.filename: =filename;   // чтобы исправленный текст не затёр источник                 end; наконец, для кнопки "сохранить" пишем:       memo1.lines.savetofile(opendialog1.filename);   // сохраняем туда, откуда считали