03/08/23 10:28
>>610
var
f: text;
s: string[255];
begin
while not eoln(f) do
read(f, s);
readln(f);
end
03/08/23 10:28
>>610
var
f: text;
s: string[255];
begin
while not eoln(f) do
read(f, s);
readln(f);
end
03/08/23 10:28
>>610
var
f: text;
s: string[255];
begin
while not eoln(f) do
read(f, s);
readln(f);
end