Войти Регистрация Спроси ai-bota

Среди чисел 1, 4, 9, первое число, большее n

Ответ:

10149

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 оценок)

Популярные вопросы: Информатика

Елисавета23

24.04.2020 17:25

РЕШИТЬ НА PYTHON: В некотором году на участке площадью в 100 гектаров средняя урожайность ячменя составляла 20 центнеров с гектара. Ежегодно площадь участка увеличивается на 5%,...

Lolololololololol4

08.01.2021 12:00

Создайте программу, которая находит сумму нечетных чисел в диапазоне от 1 до N. Где N - любое положительное целое число, введенное с клавиатуры....

nasyapest

16.02.2022 03:43

СПОЧНО!! Напишіть задачу/програму ʼдля обчислення парного і непарного числаПитає - введіть ЧИСЛО,щось обчислюе...виводить: число парне або число непарне ...

GameNooB

30.06.2022 11:08

Найдите результат Программный код: S=4 for in range (1,7,2) s=s +1 print(s) Варианты ответа : 13 17 16 15...

anastasia1medvedeva

25.02.2022 22:04

Для украшения дома черепаха решила вышить салфетки. создайте программы для рисования схемы вышивки...

виталий146

27.04.2022 03:32

Бағдарламалау тілдері - деген не...

ladychoco

06.03.2021 13:30

Найдите значения выражений. 1) ((0&А)∨(B&1))V12) ((A∨1)&(B∨0)&(1∨0))...

Margaryaanmag

03.04.2023 07:19

ИНФОРМАТИКА Знайти всі числа менші N, які є квадратами натуральних чисел. Формат вхідних даних У стандартному вхідному потоці дано ціле додатне N (N = 1000000). Формат вихідних...

Exzify

24.11.2020 05:25

X=8;z=4 abs(z-x)-вычислить модуль...

davidgts

05.09.2022 22:33

Запишите на языке программирования математическое выражение...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку