Определите методы работы с файлами по их описанию.
Мне надо второе

1)

Режим | Описание

r | Только для чтения.

w | Только для записи. Создаст новый файл, если не найдет с указанным именем.

rb+ | Для чтения и записи

a+ | Откроет для добавления нового содержимого. Создаст новый файл для чтения записи, если не найдет с указанным именем.

2) Записать можно строку в файл с write()

чтение первых n символов файла осуществляется с read(n)

добавляет последовательность строк в файл append()

Метод flush() очищает внутренний буфер.

1 simvol zanimaet 1 bait(tak kak imeem tekst);

tekst shpargalki sostavliaet 50*50=2500 simvolov-2500 bait.

da + eshe 0,3*2500=750.

vsego 2500+750=3250 bait.

var

  i: integer;

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

begin

  for i: =1 to 16 do

begin

  a[i]: =random(40)-20;

  if a[i] mod 3=0 then write(i,' ');

end;

writeln;

end.