Question

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

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

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

Answer 1

var m,k: integer;

begin

readln(m);

k:=round(sqrt(m));

while m mod sqr(k) <> 0 do k:=k-1;

writeln(k*k);

end.

Пример:

180

36

Answer 2

Добрый вечер можете пожалуйста решить эти задачи за них дают максимум балов https://znanija.com/task/30204100 https://znanija.com/task/30204127 https://znanija.com/task/30204176 https://znanija.com/task/30204235 https://znanija.com/task/30204262 https://znanija.com/task/30204276