Предмет: Информатика,
автор: iral300
сумма двух первых чисел заданного четырехзначного числа равна сумме двух его последних цифр
Ответы
Автор ответа:
0
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
4<>9
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
4<>9
Похожие вопросы
Предмет: Другие предметы,
автор: zarinamakarova82
Предмет: Алгебра,
автор: deisan228
Предмет: Қазақ тiлi,
автор: Olpador
Предмет: Физика,
автор: zakirovdeniska
Предмет: География,
автор: tsmarinadima