Var integer begin while. N%10 в си. var s n integer begin s 0 n 1 while sqr s+2 125 do. s = n * s1. var n s integer.