administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

read1.pas

Browse source
This commit is contained in:
Ivan Bondarev 2024-04-14 12:02:47 +02:00
parent 7e8dd32b4b
commit cbe0f60055
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
TestSuite/read1.pas
View file

@ -1,7 +1,12 @@
var var
read: integer; read: integer;
procedure test;
begin begin
assign(input, 'read1.txt'); assign(input, 'read1.txt');
readln(read); readln(read);
assert(read = 45); assert(read = 45);
end;
begin
//TODO
end. end.