Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Kira1574
04.06.2020 12:04 •
Информатика
Pascalabc.net из чисел от 10 до 99 вывести те, сумма цифр которых равна s
Ответ:
green121
05.10.2020 08:11
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadInteger('S=');
Range(10,99).Where(m->(m div 10)+(m mod 10)=s).Println
end.
Пример
S= 7
16 25 34 43 52 61 70
0,0
(0 оценок)
Популярные вопросы: Информатика
рттири
26.01.2023 02:59
Расшифруйте текст, записанный шестнадцатеричным кодом, если известно, что код 9816 соответствует букве «й»: а6 97 9е а0 аа....
amura20
26.01.2023 02:59
Алфавит племени пиджен состоит из четырех букв. аборигены закодировали слово савd с использованием следующей кодовой таблицы: a b c d 0 1 01 010 и передали его, не...
Jonson2002
30.10.2020 20:49
Статья, набранная на компьютере, содержит 40 страницы, на каждой странице 26 строк, в каждой строке 34 символа. Определите информационный объём статьи в одной из кодировок...
dimabaklykov
09.03.2022 22:13
Почему в Ворде отсутствует добавление страницы...
xomis1
04.11.2021 08:44
Определите значение переменных n и m после выполнения алгоритма В ПРИЛОЖЕНИИ КУМИР...
inkakanchiyp0706d
05.07.2022 10:11
Напишите программный код на языке Python 1) 12.9+ 8 2) 8*13.3 3) Я учусь в шестом классе сор2...
vikamolchanova1
23.02.2021 15:37
Программирование алгоритмов на языке Python дам 100...
sad1300
12.03.2021 23:31
Дано натуральное число N. требуется вывести на экран в обратном порядке все цифры в записи этого числа Ввод 152895 Результат 5 9 8 2 5 1...
knoposhka123
02.06.2022 22:02
1)Задана строка L, состоящая из латинских букв опредилите встречается ли буква k в этой строке, если имеется эта буква то код должен выдовать команду yes если буквы...
negatiff95
09.06.2021 18:53
Массив содержит 2n чисел. Из суммы первых n его элементов вычесть сумму последних n элементов....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadInteger('S=');
Range(10,99).Where(m->(m div 10)+(m mod 10)=s).Println
end.
Пример
S= 7
16 25 34 43 52 61 70