дано трехзначное число. определить является ли средняя цифра делителем суммы первой и последней цифр

Question

Информатика

Марюха

11 августа, 07:46

дано трехзначное число. определить является ли средняя цифра делителем суммы первой и последней цифр

+2

Ответы (1)

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

Пахомий · Answer 1

var x, i, x1, x2, x3:integer

s:string;

Begin

read (x) ;

s:=str (x) ;

x1:=int (s[1]) ;

x2:=int (s[2]) ;

x3:=int (s[3]) ;

if (x1+x3) mod x2=0 then writeln ("да")

else writeln ("нет") ;

End.