Ответ:
program abc;
var m,o,k:int64;
begin
readLn(m);
o:=2000000000;
for i:integer:=trunc(sqrt(m))+1 downto 1 do
if (o>m div sqr(i)) and (m mod sqr(i) = 0) then
begin
o:=m div sqr(i);
k:=sqr(i);
end;
writeLn(k);
end.
Объяснение:
1) одновременная работа со звуком, анимацией, видео, статичными объектами
5 вправо 25 вперёд 30 вправо 35
Повторила)
#include <iostream>
#include <clocale>
int main()
{
std::setlocale(LC_ALL, "Russian");
double
a, result;
std::cin >> a;
for (size_t i = 2u; ; i++)
{
result = 1 + static_cast<double>(1) / i;
if (result >= a)
std::cout << "1 + 1 / " << i << std::endl;
else break;
}
std::system("PAUSE >> void");
return 0;
}