Ответы на вопрос:
Uses crt; var n,i,k: integer; begin read(n); for i: =1 to n-1 do if i mod k=0 then k: =k+1; writeln(k); end.
Популярно: Информатика
-
anastasia123123404.01.2020 00:23
-
polulera200524.03.2022 11:24
-
майя15519.10.2021 02:54
-
assikissa98761403.04.2021 17:45
-
nikolya530.07.2022 21:12
-
morfinn20.12.2022 09:08
-
aaannnaaa102.10.2021 00:02
-
danul141421.01.2022 03:13
-
skskkslslw28.01.2023 22:40
-
Be11a22.08.2021 18:20