Question

1. С клавиатуры вводится целое положительное (может быть равно 0) число А, не превышающее 30 000. Напиши программу, которая считает и выводит на экран сумму цифр числа А. 2. С клавиатуры вводится целое положительное (может быть равно 0) число С, не превышающее 30 000. Напиши программу, которая считает и выводит на экран количество нечётных цифр числа С.

Answer 1

1)

var

A,s: integer;

begin

 writeln ('Ведите А: ');

 readln(A);

 if A>30000 then

   begin

   writeln ('Ошибка. А больше 30000');

   end

 else

   begin

   s := 0;

 while a > 0 do

 begin

   s := s + A mod 10;

   A := A div 10;

 end;

 writeln(s);

 end;

end.

2)

var

C,index,i: integer;

begin

 writeln ('Ведите C: ');

 readln(C);

 if C>30000 then

   begin

   writeln ('Ошибка. C больше 30000');

   end

 else

   begin

   for i:=0 to C do begin

     if(i mod 2) = 0 then

       else begin

         index:=index+1;

         end

     

     end

 end;

 writeln (index);

end.

Answer 2

===== PascalABC.NET =====

-1-

begin

 var n := ReadInteger;

 var s := 0;

 while n > 0 do

   (s, n) := (s + n mod 10, n div 10);

 s.Print

end.

-2-

begin

 var n := ReadInteger;

 var k := 0;

 while n > 0 do

 begin

   if Odd(n mod 10) then

     k += 1;

   n := n div 10;

 end;

 k.Print

end.

Answer 3

Для выполнения задачи 1 (сумма цифр числа) вам потребуется следующий код на Python:

pythonCopy code
# Ввод числа А с клавиатуры
A = int(input("Введите целое положительное число, не превышающее 30,000: "))

# Переменная для хранения суммы цифр
сумма_цифр = 0

# Перебираем цифры числа А
while A > 0:
    сумма_цифр += A % 10
    A //= 10

# Выводим сумму цифр
print("Сумма цифр числа:", сумма_цифр)

Для выполнения задачи 2 (количество нечётных цифр числа) вам потребуется следующий код:

pythonCopy code
# Ввод числа C с клавиатуры
C = int(input("Введите целое положительное число, не превышающее 30,000: "))

# Переменная для хранения количества нечётных цифр
количество_нечётных_цифр = 0

# Перебираем цифры числа C
while C > 0:
    цифра = C % 10
    if цифра % 2 != 0:
        количество_нечётных_цифр += 1
    C //= 10

# Выводим количество нечётных цифр
print("Количество нечётных цифр в числе:", количество_нечётных_цифр)

Эти программы сначала запрашивают ввод чисел с клавиатуры, затем используют циклы для анализа цифр в числе и выполнения соответствующих вычислений. Результаты выводятся на экран.