Question

Дано трёхзначное число 527 найти сумму цифр в числе( Паскаль) ​

Answer 1

Ответ:

var

 sum:real;

 n:integer;

begin

 n:=527;

 sum:=(n div 100)+((n div 10) mod 10)+(n mod 10);

 writeln('Сумма чисел в числе равна: ',sum);

 writeln;

 readln;

end.

Answer 2

Для нахождения суммы цифр в трёхзначном числе 527 в языке программирования Pascal, вы можете использовать следующий код:

pascalCopy code
program SumOfDigits;
var
  number, sum, digit: integer;
begin
  number := 527;
  sum := 0;
  
  while number > 0 do
  begin
    digit := number mod 10;  // Получаем последнюю цифру числа
    sum := sum + digit;      // Добавляем цифру к сумме
    number := number div 10; // Убираем последнюю цифру из числа
  end;
  
  writeln('Сумма цифр в числе 527: ', sum);
end.

Этот код разбивает число 527 на отдельные цифры, суммирует их и выводит результат. В данном случае, сумма цифр в числе 527 будет равна 5 + 2 + 7 = 14.