sample.tny

来自「小型编译器,可以用于测试使用」· TNY 代码 · 共 8 行

int  A,B,C,D;                                                                                              
while A<C and B>D do                          
if A=1 	then 	A:= B*C+37 
else   repeat A:=A*2
until (A+C)<=(B+D)                      
end
end