Question

Дано двузначное число n. Определить больше ли числа 9 сумма его цифр? ОЧЕНЬ СРОЧНО!!! Паскаль

Answer 1

Ответ:

var a:integer;  

begin  

readln(a);  

if (a mod 10+a div 10>10) and(a mod 10+ a div 10<100) then  

writeln('двузначное')  

else writeln('не двузначное');  

if a mod 10+a div 10>a then  

writeln('больше')  

else writeln('не больше');  

end.

Answer 2

Конечно, вот пример кода на Pascal, который позволит вам определить, больше ли число 9 сумма его цифр:

pascalCopy code
program CompareToNine;

var
  n, digit1, digit2, sum: integer;

begin
  // Введите двузначное число n
  write('Введите двузначное число n: ');
  readln(n);
  
  // Разделяем число на цифры
  digit1 := n div 10;
  digit2 := n mod 10;
  
  // Считаем сумму цифр
  sum := digit1 + digit2;
  
  // Сравниваем сумму с числом 9
  if sum > 9 then
    writeln('Сумма цифр больше 9')
  else
    writeln('Сумма цифр не больше 9');
end.

Просто скопируйте этот код в среду программирования Pascal (например, Free Pascal) и выполните его. Введите двузначное число n, и программа определит, больше ли сумма его цифр числа 9.