Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
va1k
08.09.2021 03:17 •
Информатика
Среди чисел 1, 4, 9, первое число, большее n
Ответ:
ako91545
20.08.2020 10:31
Var n,m:integer;
begin
write('n = ');
readln(n);
m:=1;
while m*m<=n do m:=m+1;
writeln('m = ',m*m);
end.
Пример:
n = 70
m = 81
0,0
(0 оценок)
Популярные вопросы: Информатика
elenakrivohiza3555
01.06.2023 21:08
Назовите преимущества трёхмерной графики...
AAOO
06.06.2022 02:10
Какие инструменты входят в группу расширенных инструментов в скетчап...
sevsdasdaddd
19.10.2022 02:05
Какая страна является родной интернета...
081120071
08.01.2022 15:52
Число 2017 в троичной системе счисления ....
id95874775
17.02.2021 05:28
Формулу используя закон склеивания а*в*с+а_*в*с...
GhostS1037
14.03.2022 04:02
Дан целочисленный массив из 40 элементов элементы массива могут принимать целые значения от 1 до 10000 включительно. опишите на естественном или на одном из языков программирования...
MrBonnie
15.02.2022 21:23
Улитка ползла на север потом повернула 7 раз налево и 6 раз направо(повороты под прямым углом) куда ползет улитка...
Udjfjwojzksnsnsnslkm
04.01.2021 06:40
Решить Pascal. Задача 1. Написать программу, выводящую на экран в столбец все чётные числа из промежутка от 100 до 150.Задача 2. Написать программу, выводящую на экран в столбец...
Fire73
30.04.2020 22:49
Как из 5 картинок (.bmp) сделать gif-анимацию? ! до конца урока 25 ! [3 смена - ненавижу]...
volkow2711ovuu5e
27.11.2020 22:53
Пользуясь шестом как рычагом, человек поднял груз на высоту 0,2 м, совершив работу 280 дж. длинное плечо рычага в 5 раз больше короткого. с какой силой человек действовал на...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
write('n = ');
readln(n);
m:=1;
while m*m<=n do m:=m+1;
writeln('m = ',m*m);
end.
Пример:
n = 70
m = 81