Сумма двух первых чисел заданного четырехзначного числа равна сумме двух его последних цифр

Question

Информатика

Лева

30 января, 21:13

Сумма двух первых чисел заданного четырехзначного числа равна сумме двух его последних цифр

+5

Ответы (1)

Знаете ответ?

Маняша · Answer 1

Program prim;

var n, s1, s2:integer;

begin

write ('n=') ; readln (n) ;

s1:=n div 1000 + n div 100 mod 10;

s2:=n mod 100 div 10+n mod 10;

if s1=s2 then writeln (s1,'=', s2) else writeln (s1,'', s2)

end.

Пример работы:

n=1345

49