Регистрация
Lanevskie2004
04.12.2021 13:27
Информатика
Есть ответ 👍

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

229
343
Посмотреть ответы 2

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

sofa372
sofa372
4,5(17 оценок)
Var a: array[1..6] of integer; i,k,s: integer; begin for i: =1 to 6 do read(a[i]); k: =0; s: =0; for i: =1 to 6 do if i mod 2 = 1 then begin k: =k+1; s: =s+a[i]; end; writeln('среднее арифметическое элементов массива с нечетными номерами = ',s/k); end.
lolkek142
lolkek142
4,5(96 оценок)

var

y,x: real;

begin

read(x);

if x>=5 then

y:=sqr(x)+10

else

y:=-x+5;

write(y)

end.

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