Найти сумму нечётных делителей натурального числаПаскаль!! 

Экономика
Найти сумму нечётных делителей натурального числа Паскаль!! 
Гость
Ответ(ы) на вопрос:
Гость
var a,b,n:real; begin writeln('vvedite chislo'); readln(a); b=1; n=b; while b