составить программу решающую следующую задачу : дано трехзначное число . найти сумму его крайних чисел.

VarA:integer;BeginWriteLn('Введите трёхзначное число');ReadLn(A);WriteLn((A div 100)+(A mod 10))End.