Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
KRMP037
03.02.2022 11:54 •
Информатика
10 ! паскаль: написать программу,которая вычисляет сумму средней и последней цифры трёхзначного числа
Ответ:
katy54445
08.10.2020 16:03
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger;
Writeln(n mod 10+(n div 10) mod 10)
end.
0,0
(0 оценок)
Ответ:
Danilakibilda
08.10.2020 16:03
Смотри код на картинке:
0,0
(0 оценок)
Популярные вопросы: Информатика
malka75
01.12.2021 09:34
2048страниц 48 строк 72 символа 1 символ это 16 бит...
Belka1712
03.12.2020 00:49
На летних каникулах все ученики 6 класса были со сверстниками в оздоровительном лагере или на море с родителями 18 учеников были в лагере а 12 отдахнули на море , при этом...
cfxdcvbnm
03.12.2020 00:49
Pascalabc.! 85 нужна ! нужно написать 2 программы на выбор на языке паскаль(желательнл одну из 2 , и одну из 3,но непринцпиально): 2.18 вводится возраст пяти человек.необходимо...
strelok11261
07.02.2020 07:43
Нужно создать программу в lazarus так : есть трцифровое число , его нужно позать так как сумму разрадных единиц и еще запись в обратном порядке. вот так: пишу число например...
qwer54321asdfrewq
07.02.2020 07:43
Сообщение, записанное буквами из 64 - символьного алфавита, содержит 500 символов. какой объём информации (в килобайтах) оно несёт?...
dashapendus2003
30.07.2020 11:39
Вмассиве а1 , а2, а18 вычислить сумму отрицательных до последнего нулевого и произведение элементов расположенных правее него....
DenisРоссия
28.02.2023 04:41
В коробке лежат 64 цветных карандаша, сообщение о том что достали белый карандаш несет 4 бита. Сколько НЕ белых карандашей было в корзине?...
Офелия12345
28.02.2023 04:41
Может ли в качестве цифры в системе счисления использоваться символ буквы...
shuius
05.02.2021 23:54
мне очень Какое действие нужно выполнить, чтобы столбец был по ширине, как самая длинная запись в этом столбце? Двойной щелчок в строке формул Двойной щелчок ячейки с длинным...
Krasotcakotik
04.11.2020 00:16
Порядок проведения эвакуации населения?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger;
Writeln(n mod 10+(n div 10) mod 10)
end.