tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Ввести трехзначное число
Ввести трехзначное число с клавиатуры и выяснить будет ли сумма его цифр < 10
Арменкаааа
1 02.08.2019 22:40
1
Ответы
Ivanka23
30.09.2020 03:59
Var
num: integer;
begin
readln(num);
writeln('Больше 10? ', num mod 10 + num div 100 + num div 10 mod 10 > 10);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
myza05
27.01.2021 14:37
создаите массив которыйхранит названия шести городов Казахстана. 2.отобразите массив. 3.отобразите второй город из массива.4 отобразите последний город из массива...
alinnnkaaa
27.01.2021 14:37
Как называется сервисы, предоставляющие услуги платформы с По?...
veronikadedylia
30.09.2019 04:20
Глупенькому человеку)перевод в десятичную столбиком. 123/2 124/8 124/16...
соня1572
06.12.2020 11:48
Нужна знаю много требую ,но не кто не знает как делать...
алинка554
06.12.2020 11:49
Пусть ПК выдает выдает примеры на умножение (рандомные числа), количество примеров - запрашивается при запуске программы. В зависимости от количества правильных ответов выставляется...
yanssen1976
06.12.2020 11:49
6. Как на языке HTML установить цвет текста?...
Elmir03042003
06.12.2020 11:49
В школьной библиотеке 32 стеллажа с книгами, на каждом – по 16 полок. Ученику сообщили, что нужный учебник находится на 7-ой полке 6-го стеллажа. Какое количество информации...
kiril228tut
08.04.2020 13:50
По восприятия информация бывает...
MiyaGi123
08.04.2020 13:49
Введите, что будет выведено в результатевыполнения следующего фрагмента программы:а:=15;b= 20:x:= b;if a b then x := a-b else x := b-a;writeln (x);...
КамиLLочка
08.05.2020 14:05
Complete the gapped sentences so that they have a similar meaning to the original ones, using the words given.1 It isn’t necessary for you to attend the event. HAVE You the...
Популярные вопросы
Тест все задания 3 задание с графиком ...
1
Оқжетпес тауы қалай пайда болды?...
1
. Диск вентилятора имеет радиус R= 25 см. и за t= 200 секунд совершает N=...
3
Заполните пробелы в предложениях: 1.Если атом отдает электроны, то он получает...
2
у меня осталось 20 минут ...
3
Для изобранного нагревания идеального двухатомного газа ему сооюбщили 12МДж...
1
температура,при которых химические процессы протекают в живых организмах,...
1
Назовите орудия труда на картинке надо...
1
Як назвав Шевченко-поет свій зоряний час (1845-1847рр)...
1
выберите слова-антонимы: черный-белый грустный-вежливый мокрый-громкий толстый-...
3
num: integer;
begin
readln(num);
writeln('Больше 10? ', num mod 10 + num div 100 + num div 10 mod 10 > 10);
end.