Вводится имя большего размера, чем 8 позиций, то будут восприняты только первые 8 символов и они будут записаны в переменную IMFILE;

Задача:

Файл с именем TEX.DAT содержит две записи: фамилию и адрес.

 

Сёмин А.В.

ул. Могилёвская д.37 кв.6

Задача: Прочитать первую строку как переменную, вторую строку как текстовый массив. Вывести считанную информацию форматно.

Разобьём строки на переменные, в которые мы и будем производить считывание.


 

Сёмин А.В.

АT

ул. Могилёвская д.37 кв.6

В1 В2 В3 В4 В5

 

CHARACTER*10 AT,B(5)*5

С Пример 1: w=len

Количество позиций ширины поля w оператора Format совпадает с длиной переменной, описанной в CHARACTER*10 AT,B(5)*5

OPEN (4, FILE=’TEX.DAT’)

READ (4,8) AT,(B(J),J=1,5)

Открываем TEX.DAT, читаем из него переменную АT и массив В.

8 FORMAT (A10/5A5)








Дата добавления: 2015-06-10; просмотров: 1026;


Поиск по сайту:

При помощи поиска вы сможете найти нужную вам информацию.

Поделитесь с друзьями:

Если вам перенёс пользу информационный материал, или помог в учебе – поделитесь этим сайтом с друзьями и знакомыми.
helpiks.org - Хелпикс.Орг - 2014-2024 год. Материал сайта представляется для ознакомительного и учебного использования. | Поддержка
Генерация страницы за: 0.003 сек.