Pascal-программа знайти, та вивести на стандартний потік виведення, перше просте число, більше за число n (n вводиться з стандартного потоку введення).
223
353
Ответы на вопрос:
Var n,i,j,k: integer; begin write('n = '); readln(n); i: =n; k: =1; while k> 0 do begin i: =i+1; k: =0; for j: =2 to round(sqrt(i)) do if i mod j = 0 then k: =k+1; end; writeln(i); end. пример: n = 200211
Даже не могу себе представить, что может быть лучше плавания. я люблю плавать, поэтому три раза в неделю я хожу в бассейн, что доставляет мне безграничную радость. плавание поднимает мне настроение, укрепляет мою иммунную систему и делает меня здоровее.не для кого не секрет, что именно плавание задействует практически все мышцы нашего тела.оно делает человека гибким и спортивным. помимо всего прочего, пловцам не свойственно набирать лишний вес
Популярно: Информатика
-
esaloverzhan01.08.2020 03:22
-
альбина33024.01.2023 20:36
-
iSia0724.05.2023 04:53
-
rockmus25.10.2021 14:01
-
лппериоаоаопоопо02.10.2021 21:14
-
gamsteriv02.06.2023 20:30
-
padafet250416.05.2020 15:48
-
Грихыч200207.10.2020 21:45
-
КирОаоырчлцрслчь17.12.2020 03:52
-
vyachik200006.08.2020 01:32