Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
nkochneva1
14.03.2022 09:05 •
Информатика
Дано пятизначное число.найти сумму квадрата его цифр
Показать ответ
Ответ:
hippol
10.06.2020 14:52
For i:=1 to 5 do begin
Cifra:= num mod 10;
Num:= num div 10;
Sum:=sum+cifra*cifra;
End;
Объяснение:
0,0
(0 оценок)
Популярные вопросы: Информатика
Нюся5012
30.06.2022 21:14
Очень Очень нужно, прям Буду очень благодарнаЗаранее гигантское ...
sirushdarbinyap0aqdv
29.06.2021 04:13
Решите уравнение Х⁸-1010²=А¹⁶...
JuliIs26
16.01.2022 18:38
и если можно,объясните как это решается...
mashka0414
02.01.2022 16:46
И если можно,объясните как это решается...
ppn01012014
18.10.2020 19:28
Создать массив из 20 элементов случайными числами. Четные элементы поделить на 2, а нечетные умножить на 2. Вновь созданный массив распечатать....
kirill5761
03.12.2021 10:33
Информатика кто знает незнаете не пишите всякую глупость...
Anasha12
13.05.2020 05:51
X⁸-1010²=a¹⁶ решите (я отметила как быстрее...
LugovoyDanila
06.01.2023 01:39
Вычислить значение y=2x^2 при 10 значениях х. Шаг параметра цикла равен 1....
ZloYDedyskA
26.04.2022 14:34
Определите область истинности логического выражения т е наборы входящих в выражение высказываний при которых F будет истинным с таблицы истинности F=(Av(B&A))v(A&B)...
Настя16764631
23.08.2022 15:19
Сколько кб информации будет в сообщении, если текст набран с символьного алфавита и содержит 4листа. На каждом листе по 320 символов. В ответе записать только число....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
For i:=1 to 5 do begin
Cifra:= num mod 10;
Num:= num div 10;
Sum:=sum+cifra*cifra;
End;
Объяснение: