(while:prn:int:/(+(*(/:= a(read)b(read))a a)b)2)