Added bardemo
This commit is contained in:
		
							parent
							
								
									77846e5800
								
							
						
					
					
						commit
						048cbac0b4
					
				
							
								
								
									
										15
									
								
								programs/bardemo.tri
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										15
									
								
								programs/bardemo.tri
									
									
									
									
									
										Normal file
									
								
							@ -0,0 +1,15 @@
 | 
			
		||||
! this won't work until after some work in the practicals
 | 
			
		||||
let
 | 
			
		||||
    var a : Integer;
 | 
			
		||||
    var b : Integer
 | 
			
		||||
 | 
			
		||||
in
 | 
			
		||||
    begin
 | 
			
		||||
        a := 1;
 | 
			
		||||
        b := 2;
 | 
			
		||||
        
 | 
			
		||||
        putint(a);
 | 
			
		||||
        putint(b);
 | 
			
		||||
        putint(|a);
 | 
			
		||||
        putint(|b)
 | 
			
		||||
    end
 | 
			
		||||
		Reference in New Issue
	
	Block a user