Решение задачи While 8

#include <bits/stdc++.h>
using namespace std;

int main() {
	srand((int)time(0));
	int N = rand() % 1000 + 1;
	cout << "N = " << N << endl;
	
	int K = 1;		
	while(K*K <= N)
		K += 1;
	K -= 1;
		
	cout << "K = " << K << endl;
	cout << "K^2 = " << K*K << endl;
	cout << "{K+1}^2 = " << (K+1)*(K+1) << endl;

	return 0;
}

import random

N = random.randrange(1,1000)
#N = 100
print('N = ', N)

K = 1
while K*K <= N:
    K += 1
K -= 1
print("K = {0}, K^2 = {1}, (K+1)^2 = {2}".format(K,K**2,(K+1)**2))
									

program While8;
var
  N,k :Integer;
begin
  Write('Введите N: ');
  Readln(N);
  K:=1;
  while Sqr(K)<=N do inc(K,1);
  Writeln(K-1);
end.