46

Найти значение функции f (k) /k для каждого k=2,3,… N где f (k) — кол-во простых чисел от 2…

19 апреля 2023

Найти значение функции f (k) /k для каждого k=2,3,… N где f (k) — кол-во простых чисел от 2 до k. Решить на паскале или на псевдокоде. Ну или хотябы объясните алгоритм.

категория: информатика



49

var k,n: word; function f (x: word): word; var n,i,j: word; beginn: =0; for i: =2 to x do for j: =2 to i doif i mod j=0 thenif i<>j then break else inc (n); f: =n; end; beginwrite ('Введите n='); readln (n); for k: =2 to n dowriteln (k-1,'=', (f (k) /k): 0:2); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...