Developing.ru

Завдання.
Визначити чи дорівнює сума двох перших цифр заданого чотиризначного числа сумі двох його останніх сторін.

tmp1:= x div 100;
tmp2:= x mod 100;
if tmp1 div 10 + tmp1 mod 10 = tmp2 div 10 + tmp2 mod 10
then writeln('Та');
else writeln('Нi');