Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
1Kotejka1
22.05.2022 22:37 •
Информатика
:дано 2-х значное число, определить является ли сумма его цифр 2-х значным числом. вопрос: как решить эту в программе free
Ответ:
anonimus8310
04.08.2020 06:45
//Pascal
var N: byte;
begin
write('Введите 2-значное число: '); readln(N);
if (N mod 10 + N div 10) >= 10 then
writeln('Сумма цифр 2-значная = ', N mod 10 + N div 10)
else
writeln('Сумма цифр не 2-значная = ', N mod 10 + N div 10);
readln;
end.
Пример:
Введите 2-значное число: 86
Сумма цифр 2-значная = 14
Введите 2-значное число: 54
Сумма цифр не 2-значная = 9
0,0
(0 оценок)
Популярные вопросы: Информатика
angalena
11.05.2023 01:50
Когда нужно использовать ветвление в программе? Укажите один или несколько правильных вариантов ответа: Тогда, когда необходимо обеспечить выполнение разных действий в...
mymrina05
20.10.2021 01:57
Денис играет в морской бой со своим компьютером. игра только началась. правила почти стандартные: a. есть поле 9××9. b. на поле есть 2 вида однопалубных кораблей: 1. желтые...
artur17499
08.12.2022 06:07
Создать программу, в которой на экран будут выведены в строчку через разделитель пробел все нечётные числа от 1 до 99 (паскаль)...
shishovtopking
08.12.2022 06:07
Написать программу в vba, которая меняет местами минимальный и последний элемент массива целых чисел....
kapcha228
13.01.2021 08:20
Сачыненне пра лепшага сябра...
dimailiysovдима
08.03.2023 23:57
Функция задана формулой f Найдите ffff...
sasha07022005
08.11.2020 23:57
5. Рассмотрите три изображени Объясните, что связывает эти изображения, ответ:...
NeSharitVMatematike
16.04.2021 00:54
В этой стране в 1844 году были изобретены спички а)Дания б)Швеция в)Нидерланды г)Швейцария д)Румыния...
кВіТкА9876565446
28.12.2020 20:52
Определи размер стихотворения А. А. Фета по его фрагменту (без указания количества стоп). Шёпот, робкое дыханье, Трели соловья, Серебро и колыханье Сонного ручья... Запиши...
фыыыы1
11.03.2021 12:18
7. Зозуля підкидує свої яйця в чужі гнізда тому, що: А) самка зозулі сприймає своїх пташенят, які з являються на світ, як конкурентів та вбиває їх; Б) дорослі зозулі та...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var N: byte;
begin
write('Введите 2-значное число: '); readln(N);
if (N mod 10 + N div 10) >= 10 then
writeln('Сумма цифр 2-значная = ', N mod 10 + N div 10)
else
writeln('Сумма цифр не 2-значная = ', N mod 10 + N div 10);
readln;
end.
Пример:
Введите 2-значное число: 86
Сумма цифр 2-значная = 14
Введите 2-значное число: 54
Сумма цифр не 2-значная = 9