ответ:1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var
Chislo, Count, Summa, n: integer;
begin
Summa := 0;
Count := 0;
readln(Chislo);
while Chislo > 0 do
begin
n := Chislo mod 10;
if odd(n) then
begin
Summa := Summa + n;
inc(Count);
end;
Chislo := Chislo div 10;
end;
writeln('Сумма нечетных цифр числа: ', Summa);
writeln('Кол-во нечетных цифр числа: ', Count);
writeln('Среднее арифметическое нечетных цифр: ', Summa / Count);
end.
Объяснение:
Поделитесь своими знаниями, ответьте на вопрос:
Дан одномерный массив. Запиши верный ответ. −16 24 0 −2 2 13 Значение элемента массива — −16. Индекс элемента массива - ?
Объяснение:
В большинстве своем массивы начинают с 0, поэтому индекс -16ти будет 0