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

Question

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

Answer 1

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