Напишите программу, которая получает с клавиатуры натуральное число и
вычисляет целый квадратный корень из него – наибольшее число, квадрат
которого не больше данного числа.
ВНИМАНИЕ! Нельзя использовать функцию извлечения квадратного корня

-всех планов

-планов , на которых ровно 4 хода

- планов на которых есть ход к коту

-планов на которых не 4 хода

-планов на которых нет ходов к коту

-планов на которых 4 хода и есть ход к коту

- планов на которых 4 хода и нет ходов к коту

на пересечении круга и квадрата - мауси и котауси

в квадрате - джек

в круге - ник

в прямоугольнике - пухлик

ответ на вопрос: план джека

var s,x,n,i: integer;

begin

  read(x,n);

s: =1;

  for i: = 1 to n do

      s: =s*x;

  writeln(s);

end.

до перелива 8     0     0

1)                 3     5     0

2)                 3     2       3

3)                 6     2       0

4)                 6     0       2

5)                 1     5     2

6)                 1     4       3 

7)                   4     4       0

program znachy2; uses crt; var n,l: integer; k,y: real; beginy: =0; readln(l); for n: =1 to l dobegink: =1/sqr(n); y: =k+y; end; writeln(y)end.