1. Дан путь к файлу: С:\ Мои документы\ Геометрия\ Контр. работы\ 8 класс\ Годовая. doc

Укажите:

А) имя файла

Б) имя диска

В) расширение и тип файла

Г) папку, в которой он непосредственно находится

Ниже

Объяснение:

Фаил: Годовая.doc

Тип: текстовый докумет Microsoft Office Word

Диск: C

Папка: Контр. работы

чтение из файла обычно пишется readln(f,s) где f имя файловой переменной так что скорей всего нужно вставить

readln(input,s); s: =s+' '; f: =0; for i: = 1 to length(s) do beginif s[i]< > ' ' then r: =r+s[i]; if s[i]=' ' then begin k: =k+1; d[k]: =r; r: =''; end; end; readln(input,n); for i: = 1 to n do beginreadln(input,sait[i]); readln(input,tegs[i]); readln(input,pop[i]);

соответственно и запись в файл write(f,s)

по одному.

обь в канал, мир,енесей,россия проплыли канал. обь выплыла и поплыла себе куда надо.

мир,енесей,россия вернулись обратно перед каналом

в канал заплыл восток.

мир,енесей,россия проплыли канал. восток уплыл

и тд