Вопрос от посетителя
дано трехзначное число. определить является ли средняя цифра делителем суммы первой и последней цифр
Отвечает Илюха:
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.