Question

Составьте программу вычисления суммы цифр введенного с клавиатуры трёхзначного числа. Например 128 сумма 11. На паскале.

Answer 1

Извини плохое качество

Answer 2

Программа для вычисления суммы цифр трехзначного числа на языке Pascal

program SumOfDigits;
var
  number, digit1, digit2, digit3, sum: integer;
begin
  writeln('Введите трехзначное число:');
  readln(number);

digit1 := number div 100; // получаем первую цифру числа
  digit2 := (number div 10) mod 10; // получаем вторую цифру числа
  digit3 := number mod 10; // получаем третью цифру числа

sum := digit1 + digit2 + digit3; // вычисляем сумму цифр

writeln('Сумма цифр трехзначного числа ', number, ' равна ', sum);
end.

Программа принимает трехзначное число с клавиатуры и вычисляет сумму его цифр. Для этого используются операции деления и взятия остатка от деления. Затем сумма цифр выводится на экран.

Например, если ввести число 128, программа выведет: "Сумма цифр трехзначного числа 128 равна 11".

Примечание: В данном ответе использованы сведения из источников