напечатать числа следущим образом
20 11.1
19 11.2
...
10 11.11

var  i:integer;begin  for i:=1 to 11 do Writeln(21-i,' 11.',i)end.Результат20 11.119 11.218 11.317 11.416 11.515 11.614 11.713 11.812 11.911 11.1010 11.11