Генерируете строку из семидесяти единичек с помощью цикла FORЗаписываете эту строку в строковую переменнуюОткрываете временный текстовый файл с произвольным именем, на запись.Пишете туда эту строку, см. п. 2.Закрываете файлОткрываете его же на чтениеСчитываете строку из этого файла в числовую переменную; кажется, это можно сделать с помощью оператора READ.Как-то так?