1-ден 10-ге дейiнгi сандардын кобейтiндiсiн табуга арналган программа денесi Паскаль тiлiнде берiлген (Дурыс жауабын корсет):
- begin k:=1; for i:=1 to 10 do k=k* i; writeln ('кобейтiндi ='k:6) end.
- begin k:=5; for i:=2 to 10 do k:=k*(i-1); writeln ('косынды ='k:6) end.
- begin for i:=5 to 10 do k:=1; k:=k*(i-2) writeln ('кобейтiндi ='k:6) end.
- begin for i:=1 to 100 do s=s+1 end. Дурыс жауап келтiрiлмеген
К сожалению, у нас пока нет статистики ответов на данный вопрос,
но мы работаем над этим.