Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
milk890098
10.11.2020 17:36 •
Информатика
Дано трехзначное натуральное число. найти разность между заданным числом и суммой его цифр. написать рограмму в паскале до завтра нужно
Показать ответ
Ответ:
slivinskaja83
05.10.2020 07:49
Var obs,n:integer;
begin
writeln('Введите трехзначное число');
readln(n);
obs:=n-((n div 100)+(n div 10 mod 10)+(n mod 10));
writeln('Разность между заданным числом и суммой его цифр = ',obs);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
32453
22.10.2022 19:44
Что из перечисленного является устройством ввода? –сканер...
валерка1973
13.12.2021 05:05
На завтра нужно! решается моя четвертная оценка!...
демлан
13.07.2020 20:20
Translate into Russian: 1. If I came later I would be late for the lesson. 2. If he had known the time-table he wouldn t have missed the train. 3. It would be better if you learned...
Ехепхеп
13.07.2020 20:20
Найти площадь параллелограмма Sabcd-?BE:AD=1:3 AD-BE=8...
ОффниКим
13.07.2020 20:20
На участке цепи, изображенном на рисунке, сопротивление каждого из резисторов равно 6 Ом. Чему равно полное сопротивление участка при разомкнутом ключе К?...
Mako9375
08.06.2021 12:16
выделить грамматическую основу: Небо было покрыто тучами....
Kurgan4511
08.06.2021 12:16
Exercise 1. Insert the verbs in the Past Perfect tense. (Вставьте глаголы в...
Tusya007
08.06.2021 12:16
7. до стадіону Максимко доїжджає на велосипеді за 8 узлин, а пішки добирається на 24 хвилини довше. У скільразів швидше Максимко доїжджає до стадіону на велоспеді, ніж добирається...
annavilnitskaja
08.06.2021 12:16
с геометрией Объём цилиндра равен 72π, высота цилиндра - 8. Чему равен периметр осевого сечения?...
shonchak
19.10.2022 06:17
6.Назовите причины поражения республиканцев в гражданской войне в Испании? Какую роль в этом конфликте занимал СССР?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Введите трехзначное число');
readln(n);
obs:=n-((n div 100)+(n div 10 mod 10)+(n mod 10));
writeln('Разность между заданным числом и суммой его цифр = ',obs);
end.