Среди чисел 1, 4, 9, 16, 25, … найти первое число, большее n (программа Паскаль)

Question

Другие предметы: Среди чисел 1, 4, 9, 16, 25, … найти первое число, большее n (программа Паскаль)

Яркf · Answer

program z1; uses crt; var i, n: integer; begin read (n); i:=1; while sqr(i) n do i:=i+1;  writeln (sqr(i)); end....