Напечатать столбиком все целые числа от 20 до 35 и вычислить корни этих чисел.
Program C6; 
var  i: integer; 
begin
 for I:=20 to 35 do writeln(I,' ',sqrt(i):0:1);
 end