Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
maxkostin29rus
23.03.2021 10:58 •
Информатика
Напишите алгоритм, который выводит все трёхзначные числа, квадрат записи которых оканчивается тремя цифрами, которые как раз и составляют рассматриваемое трёхзначное число. входных данных у алгоритма нет.
Показать ответ
Ответ:
АсияТулемисовна
22.09.2020 11:21
Var i : Integer;
Begin
For i:=100 to 999 do
If i=(sqr(i) mod 1000) then Writeln(i,' * ',i,' = ',sqr(i));
end.
Результат:
376 * 376 = 141376
625 * 625 = 390625
0,0
(0 оценок)
Популярные вопросы: Информатика
кавайнаятянка
28.10.2021 07:07
Объем сообщения равен 11 кбайт. сообщение содержит 22 528 символов. какова мощность алфавита , с которого записано сообшение?...
andreitwin
28.10.2021 07:07
Втом, что надо в последовательности найти два значения. они могут быть разными в зависимости от входных данных. например, числа 12 15 5 7 23 7. какие два наибольших...
volkego2015
12.07.2022 20:53
12222222222222222222222222222222...
semkin2004p0ds7g
05.02.2021 16:06
1 построить на промежутке [-2, 2] с шагом 0,4 таблицу значений функции: к таблице применить один из видов автоформата....
тамила52
19.01.2023 02:22
Соч по информатике 6 класс 2 четверть...
karas14
18.11.2022 14:54
Логика, требуется пожилая . поставил 25 . таблицы к формулам написать обязательно. установить, какие из следующих формул являются тождественно истинными, тождественно...
marinasok23
24.07.2021 03:43
Кроме указанных выше одно и двухвходовых элементов комбинационной логики, используют и более сложные - трёх, четырехвходовые и до, реализующие определенные логические...
edynorozhok
07.03.2020 12:46
УМОЛЯЮ ВАС ЧЕРЕЗ 10 МИН УРОК ВАС 1 ЗАДАНИЕ Выбери ответ. Сетевая технология — 1 это специальный компьютер, который предназначен для удаленного запуска приложений, обработки...
gopkomaks
18.06.2021 22:05
1. Компьютерде желі құру үшін қандай құрылғылар қажет? 2. Компьютерлік желінің маңыздылығын қалай бағалайсың?3. «Модем» қандай құрылғы, оның қызметі қандай?...
lakomkin2007
06.03.2021 11:31
1 буква сколко байтов...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
For i:=100 to 999 do
If i=(sqr(i) mod 1000) then Writeln(i,' * ',i,' = ',sqr(i));
end.
Результат:
376 * 376 = 141376
625 * 625 = 390625