Var integer begin while. Var a,b,c:integer; begin readln a. readln(x);. begin readln. begin readln a b.