Все
Математика
Алгебра
Геометрия
Литература
Русский язык
Истоки
Краеведение
Французский язык
Литературное чтение
Астрономия
Природоведение
Родной край
Немецкий язык
Технология
Физика
Английский язык
Обществознание
Химия
Биология
История
О`zbek tili
Окружающий мир
Естествознание
География
Украинский язык
Информатика
Украинская литература
Казахский язык
Физкультура и спорт
Экономика
Музыка
Право
Белорусский язык
МХК
Кубановедение
ОБЖ
Психология
Кыргыз тили
Другие предметы
Показать все предметы
Иворика
20.04.2021, 23:56
Информатика

Дано число N. Найти первое натуральное число, квадрат которого больше N.

Знаешь ответ?

Чтобы оставить ответ, или зарегистрируйтесь.

Ответ или решение 1
Айдым
var n,k:Integer; begin Write('Введите натуральное число,n='); Readln(n); while k*k<=n do inc(k); Writeln('Ответ: ',k); Readln; end. надеюсь понятно,тут нельзя,к сожалению,писать программы