program MyProgram;

// Program gets a random number and prints to screen

@use "Screen"
@use "Memory"
@use "Input"
@use "Text"
@use "Functions"

 var
	v : byte;
	u : Integer;
	
begin
	
	Memory::DisableInterrupts();
	Screen::SetMode(0);	
	Screen::Cls(0);
	for v:= 0 to 10 do
	begin
		u := Functions::GetRnd(1000);
		Text::PrintNumber(u);
	end;
	loop();
end.
	