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

Question

Информатика

Яня

13 июля, 12:52

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

+5

Ответы (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.