Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
lincha3
11.03.2023 14:36 •
Информатика
1определить кол-во цифр в числе . 2 напечатать те натуральные числа квадрат которых не превышает n . 3 найти первое натуральное число куб которого больше n .
Показать ответ
Ответ:
leonru1
01.10.2020 12:06
Var
a, c : integer;
begin
read (a);
c := 0;
while a > 0 do
begin
c := c + 1;
a := a div 10;
end;
write (c);
end.
var
i, n : integer;
begin
read (n);
for i := 1 to trunc (sqrt(n)) do
write (i, ' ');
end.
var
n, i : integer;
begin
i := 1;
while i*i*i <= n do
i := i + 1;
writeln (i);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Govnomer228
04.01.2023 07:55
Что такое Робот ( коротко и ясно)...
Reshauvce
12.10.2021 11:17
Какое значение получит переменная y после выполнения алгоритма? x:=4 y:=4∗x y:=y+4 y:=y∗x y:=y+5 y:=y∗x y:=y+6...
dmitriy14nagiev
04.12.2022 18:16
Ано логическое выражение: (a 5)and(a 43) . Такое логическое выражение возвращает истину, лишь в том случае, когда истинны оба выражения, т.е., (выбери несколько...
мамадочп4а
01.01.2022 06:24
Белоснежка за это время подросла и становилась все красивей, и когдаей исполнилось семь лет, была онатакая прекрасная, как ясный день, икрасивее самой королевы....
ЛераЛи123
15.05.2021 08:10
мне Что такое метод (программирование)? Приведите пример....
адильнури
11.08.2022 02:44
ХОТЬ КТО НИБУДЬЛЮДИ КОТОРЫЕ ЗНАЮТ ПИТОН ИНФОРМАТИКОЙ ТЕКТО РАЗБИРАЕТЬСЯ В ПИТОНЕВопрос4. Дана строка информатика . Укажи верные примеры создания новой строки форма...
Andreyко
18.05.2020 16:07
Выражение на языке Паскаль: sqrt(sqr(z)−8∗z+6). Данное выражение на математическом языке: ∣∣z2−8z+6∣∣ (z3−8z+6)2 z2−8z+6−−−−−−−−−√5 z2−8z+6−−−−−−−−−√...
котямотя3
06.03.2023 01:26
Дан произвольный треугольник ABC, для которого определен следующий набор характерных параметров: a,b,c - стороны треугольника, альфа, бета, гамма - углы (в градусах),...
vikt24oria
28.05.2021 12:12
Белоснежка за это время подросла и становилась все красивей, и когдаей исполнилось семь лет, была онатакая прекрасная, как ясный день, икрасивее самой королевы....
lyudmila198604p06n4e
05.11.2022 13:25
Разработать алгоритм и программу. Компонентами типизированного файла являются записи, состоящие из следующих полей: - фамилия студента; - инициалы; - специальность;...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, c : integer;
begin
read (a);
c := 0;
while a > 0 do
begin
c := c + 1;
a := a div 10;
end;
write (c);
end.
var
i, n : integer;
begin
read (n);
for i := 1 to trunc (sqrt(n)) do
write (i, ' ');
end.
var
n, i : integer;
begin
i := 1;
while i*i*i <= n do
i := i + 1;
writeln (i);
end.