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

#2658

Browse source
This commit is contained in:
Ivan Bondarev 2022-04-24 11:28:33 +02:00
parent 9baccc150c
commit 64b85ad265
2 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
TestSuite/exe/input.txt
View file

@ -1 +0,0 @@
45

1
TestSuite/stringelem5.pas
View file

@ -4,6 +4,7 @@
begin begin
a := '1'; a := '1';
b := '1'; b := '1';
WriteAllText('input.txt','45');
assign(input,'input.txt'); assign(input,'input.txt');
readln(a[1], b[1]); readln(a[1], b[1]);
assert(a[1] = '4'); assert(a[1] = '4');