Информатика, 7 класс, (!)
Как создать текстовый файл?
Как создать графический файл?
Как сохранить файл, закрыть файл, открыть файл?

1)Текстовый файл можно сохранить когда вы его закрываете,нажали на крестик в окне программы или там есть специальная кнопка что-бы его сохранить,соглашаетесь и идете по своим делам

2)Создайте новый файл, для этого:  

  1)Выполните команду New из меню File.            

  2)Выберите тип файла – Graphic Editor File (Файл Графического     Редактора).

3)Выберите из выпадающего списка расширение .gdf.

4)Нажмите кнопку ОК.

5)После этого откроется новое пустое окно Графического Редактора.

6)Для того, чтобы сохранить файл, выполните команду Save As из меню File.

3)Что-бы сохранить файл надо его доделать выйти нажав на крестик в окне программы и вам вылезет окошко "Сохранить этот файл" если да то выбираете куда его сохранять,Что-бы закрыть файл достаточно нажать на крестик в окне программы, ну а что-бы открыть файл надо навести на него стрелку и дважды кликнуть!

используем рекурентную формулу, чтобы программу

а[n+1]=1/4

a[n]=1/2

t=(1/4)/(1/2)=1/2

a[n+1]=a[n]*1/2

program;

var  n: integer; abs,s,a: real;

begin

a: =1;

eps: =1;

s: =1;

repeat

a: =a*1/2;

abs: =abs(a);

s: =s+a;

until abs< 0.001;

writeln(s);

end;

var

i: integer;

a: array[1..20] of integer;

function fn(x: integer): integer;

begin

if x mod 10 = 4 then fn: =x div 2

else fn: =x;

end;

begin

for i: =1 to 20 do

readln(a[i]);

for i: =1 to 20 do

begin

a[i]: =fn(a[i]);

writeln(a[i]);

end;

end.