Pascal ABC while 7 Дано целое число N ( больше 1). Найти наименьшее целое положительное число K, квадрат которого превосходит N:K^2 меньше или равно N. Функцию извлечения квадратного корня не использовать.
Pascal ABC
while 7
Дано целое число N (>1). Найти наименьшее целое положительное число K, квадрат которого превосходит N:K^2 меньше или равно N. Функцию извлечения квадратного корня не использовать.
Гость
Ответ(ы) на вопрос:
ГостьVar n, k, c : integer; Begin Readln (n) ; K:=0; While c
Не нашли ответ?
Похожие вопросы