Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
raisa55555555
16.12.2020 16:50 •
Информатика
Целой переменной s присвоить сумму цифртрехзначного числа к. с хорошим оформлением. необходимо выполнить операцию присваивания.
Ответ:
Flash017
11.06.2020 14:09
var s,k:integer;
Begin
read(k);
s:= k div 100 + k div 10 mod 10 + k mod 10;
writeln(s);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Асия2008
25.07.2021 11:26
Упрощение логического выражения желательно с объяснением этапов...
DJZargo
23.09.2022 18:34
Что такое система графические примитивы?...
svetlanaGB
23.09.2022 18:34
Следующие двоичные числа запишите в порядке возрастания: 10102, 1012, 10002, 1112, 1000012, 11002....
Felua
03.04.2022 05:39
Сообщение содержит 4 страницы по 40 строк объем сообщения 7200байт, определить кол-во символов в строке если в алфавите 256 символов...
Nastyaluan
08.05.2022 15:11
Работа в excel. 1. используя набор данных «важнейшие проливы», составить таблицу и выяснить минимальную ширину проливов, максимальную глубину проливов и среднюю...
Alinakaliova
24.10.2021 10:07
3. биологический информационный канал, a) телефон. b) телевизор. c) орган зрения. d) компьютер. е) принтер....
wenefep07126
27.07.2021 17:08
2. аппарат, который используется для передачи и при звука (речи человека). a) монитор. в) сканер. c) телеграф. d) телефон. e) мышь....
ПакЧимин111
05.10.2020 00:59
Придумайте рекламу антивирусной программы.чтобы учителю захотелось ее скачать...
xandar815
21.07.2020 02:10
32 бит 80 бит 56 бит 4 компьютерМонитормодемКлавиатурамышьфайл...
mamkin0poc
07.01.2021 03:30
Переведите 256 бита в байты1) 162) 323) 1284) 81...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var s,k:integer;
Begin
read(k);
s:= k div 100 + k div 10 mod 10 + k mod 10;
writeln(s);
End.