Регистрация
Войти
Стать экспертом Правила
Информатика

Составьте программу, печатающую значение TRUE,если указанное высказывание является истинным, и FALSE в противном случае: сумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифрВпаскале

ОТВЕТЫ
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.
122
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам