Вычислить среднее арифметическое положительных элементов массива
Ответы:
03-03-2018 00:16
var a:array[1..10] of integer;i,k,s:integer;begin s:=0; k:=0;for i:=1 to 10 do readln(a[i]);for i:=1 to 10 do if a[i]>0 then begin s:=s+a[i]; k:=k+1; end;writeln(s/k);end.
Также наши пользователи интересуются:
Что такое однородные члены?Какие законы были при царе Хаммурапи?
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Вычислить среднее арифметическое положительных элементов массива» от пользователя Людмила Михайловская в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!