Основы программирования на языке Turbo Pascal. Беляева И.В. - 66 стр.

UptoLike

Составители: 

66
3 3 3 3 3
4 5 6 7 8
5 5 5 5 5
Напишем программу, загружающую числа из файла IN.TXT в массив A.
Фрагмент программы:
var
f : text; {Текстовый файл}
{Открываем файл IN.TXT на чтение}
assign(f, ‘in.txt’);
reset(f);
{Ввод количества используемых строк и столбцов}
read(f, n, m);
{Читаем по очереди из файла все элементы массива}
for i := 1 to N do
for j := 1 to M do
read(f, a[i,j]);
{Закрываем файл}
close(f);
Задача 9: Сохранение массива в текстовом файле.
Фрагмент программы:
var
f : text; {Текстовый файл}
{Открываем файл OUT.TXT на запись}
assign(f, ‘out.txt’);
rewrite(f);
{Пишем в файл по очереди все элементы массива}
for i := 1 to N do