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

Question

46

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

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

ответить

в избранное ссылка

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

forexsh · Accepted Answer

49

forexsh

12 сентября 2022

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.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: