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

program nat_chisla;var i,p: integer;beginp:=1;for i:=1 to 10 dobeginif i mod 2 = 1 then p:=p*i;end;writeln ('Произведение нечетных чисел равно ',p);end.