Var integer begin while. Readln в паскале. var s t integer begin readln. команда repeat в паскале. writeln и readln в паскале.