Ответы и объяснения

2014-02-08T07:19:16+00:00
 решение: 
var x,n:integer; 
begin 
n:=0; 
for x:=11 to 99 do 
if odd(x) then inc(n); 
writeln(n); 
readln; 
end. 

раскинув мозгами 
begin writeln((99-10+1) div 2); readln; end. 

а так как число двузначных нечетных всегда постоянно, то самое правильное решение 
begin writeln(45); readln; end.