Помогите пожалуйста с программированием !!!!!
Помогите пожалуйста с программированием !!!!!
Гость
Ответ(ы) на вопрос:
Гость//прога на Pascal`е
var
a : longint;
begin
readln (a);
if abs(a)>9 then
write (abs ( (((a mod 100) - (a mod 10)) div 10) + (a mod 10)))
else write ('В этом числе меньше двух знаков!');
end.
Не нашли ответ?
Похожие вопросы