tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Pascalabc.net из чисел
Pascalabc.net из чисел от 10 до 99 вывести те, сумма цифр которых равна s
arujan20071
1 20.08.2019 22:40
0
Ответы
zaya46
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
good129
07.09.2019 06:20
Мне по информатике что. хронится в файлах cat.doc...
Cancanich
08.02.2021 20:27
Составьте программу нахождения произведения наименьшего и наибольшего числа из трех паскаль...
дарья1645
08.02.2021 20:27
хотя бы про робота, какие слова там нужно подставить??...
winston63ru
08.02.2021 20:27
Если сможете решить, отправьте фотографию. ВАЖНО. Именно фотографию решения(например решить в заметках и сделать скриншот Ребят,это информатика, типо в Python...
dianabalaganska
29.10.2020 15:46
неучупосчитай в байтах информационный объем :размеры файлов...
Bastricov
29.10.2020 15:46
что не так с кодом? Напишите программу, которая находит большее число из двух вводимых static void Main(string[] args) { int a, b, max; Console.WriteLine( Введите первое число:...
итлиори
19.10.2020 00:36
надо Выполнить арифметические операции в двоичной системе счисления: а) сложить числа А и В (в формате с фиксированной запятой в обратном коде); б) сложить числа А и В (в формате...
15JVC15
19.10.2020 00:34
Интернет хорошо или плохо напиши ответ и обоснуй его?...
HackFox
14.03.2019 06:14
Особенности железного занавеса...
Маркіза1
14.03.2019 06:14
1) три события в отношении судьбы фаталист 2) три события наталкивающие на размышление о вопросе судьбы...
Популярные вопросы
26. Прочитайте. Запишіть лише складні речення. Розставте в нихпропущені розділові...
2
112. b-ның қандай мәнінде: 1)bд/ со—2)от | o12...
3
Көмек Геометрия 8 сынып 1.26 есеп...
1
Будь-ласка ть... (внизу прикріплена фотографія)...
2
Траса складаеться з трьох дiлянок .Довжина першоi дiлянки7,4 км менше вiд...
2
визначте масову частку в розчині що утворюється при додаванні до 200г оцтввої...
3
1. Қоныс аударушы шаруалар үшін жер телімдерін анықтау кезінде жер өлшеушілер...
3
1. Подберите свой заголовок к тексту. 2. Сформулируйте микротему 2-го абзаца....
2
Определите болезнь бирючины...
1
Скласти план життя на цілий рік....
1
// Внимание! Если программа не работает, обновите версию!
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