Дмитрий
5 год назад
составить программу решающую следующую задачу : дано трехзначное число . найти сумму его крайних чисел.
ОТВЕТЫ
Genoveva
Oct 24, 2020
Var
A:integer;
Begin
WriteLn('Введите трёхзначное число');
ReadLn(A);
WriteLn((A div 100)+(A mod 10))
End.
A:integer;
Begin
WriteLn('Введите трёхзначное число');
ReadLn(A);
WriteLn((A div 100)+(A mod 10))
End.
731
Смежные вопросы:
