- .
- || :
1) ', || ;
2) || ||. - || . , " ".
3) || || || '.
|| :
<' > = File| of| <>;
<'> = TextFile|;
<'> = File|;
<'> - ' || ( ); File|, of| ; TextFile| ' || ;
:
, ( || File| of|...);
( TextFile|);
| ( File|).
, , . || Object| Pascal| || . ,|| .
|| : Read|(<. .>,<. .>); Readln|(<. .>,<. .>); <. .> - ; <||. .> - , || .
: Write|(<. .>,<. .>); Writeln|(<. .>,<. .>); <. .> - ; <||. .> - , || || .
, || || || . '|'| ', ,|| , || : || .
' || ' |,| AssignFile|(< >, <' >);
|| . Object| Pascal| || , , .
Reset|(< >); Object| Pascal| || , , || Reset| ( ), Write| ( ). || || , , . || Reset|, write| writeln|.
|
|
|
Rewrite|(< >); . Rewrite| : ( ) || || . , 0.
Append|(< >); , . Append| || . Append| , |. || Reset| rewrite|, Append| || |,|, || .
ϳ , || , ||, CloseFile|(< >); || .
Program Vvod_Vivod;
var
a:longint;
t:text;
Begin
assign(t,'input.txt');
reset(t);
read(t,a);
close(t);
assign (t,'output.txt');
rewrite(t);
write(t,a);
close(t);
End.
