#! /usr/bin/perl -w
system("color A");
print @q= (1..1000000);
print @x= (1..1000000);
print @z= (1..1000000);
print @d= (1..1000000);