Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
025858
17.08.2020 22:39 •
Информатика
:дано 2-х значное число, определить является ли сумма его цифр 2-х значным числом. вопрос: как решить эту в программе free
Показать ответ
Ответ:
magakhass
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 оценок)
Популярные вопросы: Информатика
Nartez
05.04.2021 06:44
1. что можно отправить по электронной почте? a) музыкальный файл b) текстовый файл c) графический файл d) все перечисленное...
timahipoDrakeylol
05.01.2023 04:57
Какие программы в специальной упаковке с документации...
Akale
28.06.2022 22:07
написать Запишите слова тема урока по информатике Выполни задание учебника страница 88 задание два Расположите в правильном порядке команды алгоритма Посади дерево...
snezanakoba
10.07.2022 21:14
ответить на 1 вопрос. 1)как записать в программе а не больше с а) а =c б) a в) а не больше с г) а ≤ с...
Фидачина
26.04.2020 19:51
Как можно преобразовать текст на этапе его редактирования...
alexmerser830
05.01.2020 11:18
Виконати синктастичний анализ речення: У рідному слові народу, свідомлює себе. Виконати анализ слів:Пир ю,пізнають...
egorovartdin
12.04.2021 10:52
Назвіть короткі відомості з історії хімії у період, що передував винекниню алхімії...
polinakuznechov
12.04.2021 10:52
Перечислите извесные с вам виды языкового разбора слова. Покажите на примерах, взятых из словариков учебника,какие свойства слова анализируются при проведении кажедого...
ВладВишня
12.04.2021 10:52
Сөздердің мағыналарына сәйкес қолданылуы лексикалық нормаға , грамматикалық тұлғалардың орынды , дұрыс жұм салуы грамматикалық нормаға , дыбыстардың жазуда дұрыс таңбалануы...
MrDeder
12.04.2021 10:52
ответить на второе четвёртое...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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