Составить программу решающую следующую задачу : дано трехзначное число . найти сумму его крайних чисел.
Var A:integer; Begin WriteLn('Введите трёхзначное число'); ReadLn(A); WriteLn((A div 100)+(A mod 10)) End.