Составить алгоритм вычисления куба суммы всех нечетных чисел от 1 до 99. !Паскаль!

Question

Составить алгоритм вычисления куба суммы всех нечетных чисел от 1 до 99. !Паскаль!

Answer 1

Ответ:

Объяснение:

var

a,b,s,i:longint;

begin

s:=0;

for i:=1 to 99 do

begin

if (i mod 2 <>1) do s:=s+i;

end;

b:=s*s*s;

write(b);

end.