Паскаль помогите решить задачу на файлы

starter

New member
22.03.2017
1
0
#2
Вам нужно для начала распарсить ваш файл, потом последоваетльно подсовывать в цикле

sqr(мое число)

AssignFile(F, имя файла);
if FileExists(имя файла) then
Append(F)
else
Rewrite(F);
WriteLn(F, мое число);
CloseFile(F);
 
Последнее редактирование: