Сделать маленькую программу в паскалеВ параде принимают роль M военных. Командование

Сделать маленькую программу в паскале

В параде принимают роль M военных. Командование парада решило, что более
эффектное построение военных в форме квадрата, то есть число соучастников построения
обязано быть четким квадратом. Но поскольку число M может не быть четким квадратом,
разрешается разбить военных на несколько полков, каждый из которых строится в форме
квадрата. Для красы все полки обязаны быть схожего размера, также командование
парада желает, чтоб размер каждого полка был как можно больше. Обусловьте очень
вероятный размер полка.
Программа получает на вход одно целое положительное число M,
не превосходящее 2109
, количество соучастников парад. Программка обязана вывести одно
число очень вероятный размер полка.

Пример входных и выходных данных
Ввод Вывод
180 36

Задать свой вопрос
1 ответ

var m,k: integer;

begin

readln(m);

k:=round(sqrt(m));

while m mod sqr(k) lt;gt; 0 do k:=k-1;

writeln(k*k);

end.

Пример:

180

36

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт