📄 testeoln.p
字号:
program test(output);varch :char;f :file of char;beginrewrite(f);writeln(f,'abc');write(f,' ');reset(f);repeat read(f,ch); writeln('in main: eoln = ',eoln(f),' eof = ',eof(f),' ch = ',ch); if eoln(f) and not eof(f) then begin read(f,ch); writeln('in eolncode: eoln = ',eoln(f),' eof = ',eof(f),' ch = ',ch); end until eof(f)end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -