Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
вероника1046
11.12.2021 04:20 •
Информатика
Составьте программу, печатающую значение true,если указанное высказывание является истинным, и false в противном случае: сумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифр в паскале
Показать ответ
Ответ:
Лшалвд
07.10.2020 01:50
Program Znanija;
var n, a, b, c, d:integer;
begin
readln(n);
a:=n div 1000;
b:=n div 100 mod 10;
c:=n div 10 mod 10;
d:=n mod 10;
if (a+b)=(c+d) then
writeln("True");
else
writeln("False");
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
029292299292
07.08.2021 03:46
Построить алгоритм вычисления (блок схему) y=(x^2-6)+5...
1Юліана1
28.03.2021 10:59
Кто шарит? объясните как сделать или распишите решение...
Anna19013
15.03.2023 01:44
Можно ли тренироватся в Страстную Пятницу?...
maks7388
23.07.2022 09:13
с информатикой дайте точный ответ. Дано: :=1 65 При первом выполнении тела цикла =. * Дано: :=1 65 При последнем выполнении тела цикла =. * Сколько раз будет выполнен...
ruzhovaelizave
30.01.2020 14:40
ответе поставлю лучший ответ...
XOPOSHISTIK
25.09.2022 02:16
1. нововведения петра i: а) в одежде появился европейский покрой; б) бритье бород; в) люди стали грамотными и образованными; г) стали выпускаться книги и появились первые...
Tricjt
25.09.2022 02:16
Мке- равнобедренный треугольник с вершиной м. угол м=28 . точка т симметрична точке к относительно м ю чему равен угол кет...
keniwo
25.09.2022 02:16
Заранее . сравните выраженность металлических свойств, поставив знак или : li be al se mg na k cs ca sr сравните выраженность неметаллических свойств, поставив знак...
Nikita0228
25.09.2022 02:16
Зарисуйте схему внешнего строения рыбы подпишите основные ее части...
istomina2000
25.09.2022 02:16
Допиши слова в рифму и напиши кто это по лужайке с травкою я хожу и...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n, a, b, c, d:integer;
begin
readln(n);
a:=n div 1000;
b:=n div 100 mod 10;
c:=n div 10 mod 10;
d:=n mod 10;
if (a+b)=(c+d) then
writeln("True");
else
writeln("False");
end.