Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
apzjxmskaposjxhdh
30.06.2021 15:12 •
Информатика
Запросить двузначное число и определить является ли сумма его цифр двузначным числом в паскале
Показать ответ
Ответ:
Mahb
07.10.2020 18:41
Var
n:integer;
begin
Read(n);
n:= n div 10 + n mod 10;
if n > 9 then Writeln('Сумма цифр - двузначное число')
else Writeln('Сумма цифр - не двузначное число');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
milochkarodтирмепнрн
11.07.2021 08:34
Можно с вычислениями, 1. сколько гбит информации содержит сообщение объемом 2 в 39 степени байт? 2. сколько байт информации содержит сообщение объемом 1 мбит? 3. сколько мбит...
Kokone143
11.07.2021 08:34
Привидите примеры классификации с которыми вы познакомились на уроке : - - - биологии...
16653
13.06.2022 06:45
Дан рекурсивный алгоритм: procedure F ( n: integer); begin writeln ( n ); if n 5 then begin F ( n+1 ); F ( n+2 ); F ( n*3 ) end end; Найдите сумму чисел, которые будут выведены...
dmitrylazar1
21.02.2021 04:07
З пункту А одночасно у протилежних напрямах виїхали два потяги . Дослідіть, через який час відстань між ними стане більша ніж 400 км залежно від їх швидкостей . Створіть для...
datkinnurikozrhbf
02.01.2021 11:44
Вопрос 1 Программа - это... 1.средства, обеспечивающие взаимодействие между устройствамикомпьютера2.описаниенаформальномязыке, понятном компьютеру,последовательности действий,...
miwe10
04.10.2022 17:13
Правда или Действие на Python | Правда або Дія На Python...
Анна12061
25.08.2020 13:23
Умоляю решите все на прикреплённом файле pascal abc...
DmdmdmA
11.02.2022 10:37
Составить таблицы истинности для функций: 1) вл (ay b) 2) ay bл (ay b) 3) bv(ā^b)vā 4) ал(ay b) vв 5) (ал b) v (avв)...
nata506
04.08.2021 18:47
Сделат вывод о работе по информационнами ресурсами...
опв4
23.12.2020 13:05
1)составить блок-схему. 2)составить программу на языке паскаль или бейсик(как удобнее) y=2x^2+7x при x=0,5 (и блок-схема,и программа для этого уравнения) )...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n:integer;
begin
Read(n);
n:= n div 10 + n mod 10;
if n > 9 then Writeln('Сумма цифр - двузначное число')
else Writeln('Сумма цифр - не двузначное число');
end.