Регистрация
Соня2017000
25.04.2022 17:55
Информатика
Есть ответ 👍

Дано 30 натуральных чисел. вычислить среднее арифметическое всех нечетных чисел(паскаль)

206
210
Посмотреть ответы 2

Ответы на вопрос:

круасана
круасана
4,6(22 оценок)
Program pas; var a: array[1..30] of integer; i, k: integer; s: real; begin s: =0; k: =0;   for i: =1 to 30 do               readln(a[i]);                                 for i: =1 to 30 do                       begin                           if (not(a[i]mod 2=0)) then                           s: =s+a[i];                           inc(k);                       end;                         s: =s/k;                       write(s: 4: 0); end.
оля2029
оля2029
4,8(92 оценок)

объяснение:

это можно сделать с теоремы пифагора

Популярно: Информатика