Помогите пожалуйста,напечатать программу. Среди чисел 1,4,9,16,25...найти первое большее заданного N. (язык программирования C++)

// Среди чисел 1, 4, 9, 16, 25, ... найти первое число, большее n. Program cyberforum707298;varN :integer; // Данное число otvet :integer; // ответ i:integer; // счетчик в цикле beginWriteln('Введите целое число (N > 0) N=');readln(N);i:=1;While i*i <= N do inc(i);//otvet:=i*i;// вывод ответа Writeln('Ответ = ',otvet)end.