Паскаль.
Найти сумму корней квадратных из всех нечетных двузначных чисел

VarS:real;A:integer;BeginS:=0;For A:= 11 to 99 do    if A mod 2 <> 0 then S:=S+sqrt(A);WriteLn('S = ',S)End.