Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Словарь11
27.07.2021 05:43 •
Информатика
Написать программу, где вводиться число и находитьяс сумма цифр(паскаль, или lazarus)
Ответ:
Региша10
08.10.2020 06:49
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write('сумма цифр: ',abs(ReadInteger('введите число:')).ToString.Select(x->x.ToDigit).Sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
masha28122812
14.09.2021 02:12
Дан массив из целых чисел x[1..5]. заменить каждый элемент массива с нечетным номером средним арифметическим индексов соседних элементов....
lera0078
08.06.2022 06:09
Опишите принцип взаимодействия процессора с памятью...
Ilyauhdhbtxskr
19.07.2020 06:29
Найти ошибку: program zad6; var a: array [1..10] of integer; i,n,b: integer; begin read(n); if (n =10) then begin for i: =1 to n do b: =random(n)+0; writeln(a[b]); end; end....
Nurbibi12
18.01.2020 18:01
Значение арифметического выражения 16^8+4^6-16 записали в сс с основанием 4. сколько цифр 3 содержится в этой записи?...
89195188243aMils
18.01.2020 18:01
Произвести арифметические операции: (+а-в), (-а-в), (а+в) в прямом, обратном и дополнительном кодах. а 0.11001100 в 0.10001100....
murarr
11.08.2022 22:06
Делать в Python 4.Засобами середовища програмування Python створіть проект Зріст, у якому вводится масив цілех чисел, що відповідають зросту учнів 9 класу, а результат виводиться...
CH4PP1E
04.06.2021 15:13
Что такое абзац и что значит его форматирование?...
короваточкару
20.01.2021 20:41
1.Что выведет программа? a=10 b=15 if a b: c=1 else: c=5 print(c) 2.Что выведет программа, если пользователь введет 5, а затем 15? a=int(input()) b=int(input ()) if a==b: print...
Вова21123
16.01.2021 07:17
A = int(input()) b = int(input()) c = int(input()) d = int(input()) start start =(a - c + d - 1)// d * d for i in range(start, b + 1, d): print(i) В чем ошибка...
zakopirinina
30.01.2020 07:46
Как из дихлорбутана получить циклобутан? (формула реакции)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Версия 3.3, сборка 1634
begin
write('сумма цифр: ',abs(ReadInteger('введите число:')).ToString.Select(x->x.ToDigit).Sum);
end.