Дано двузначное число.Определить является ли сумма его цифр двузначным числом — Pascal(Паскаль)

program secondtask;

var
  number, firstnumber, secondnumber: integer;

begin
  readln(number);
  firstnumber := number div 10;
  secondnumber := number mod 10;
  if (firstnumber + secondnumber) div 10 <> 0 then
    writeln('True')
  else
    writeln('False');

end.

Leave a Comment

− 8 = 2