Помогите пожалуйста с заданиями!

Question

Помогите пожалуйста с заданиями! Массив из 30 элементов, содержащие данные экзамена (баллы, набранные на ЕГЭ). Если ученик имеет балл>=20, то это означает, что он удачно сдал экзамен. Найти средний балл сдавших экзамен. В массиве из 10 элементов найти кол-во четных и нечетных элементов. Массив заполнить RANDOM (100). Только можно, пожалуйста, с пояснениями!

Answer 1

86

gang69

24 марта 2023

1) const n=30; var a: array[1… n] of integer; i,s,k: integer; sr: real; begins: =0; k: =0; for i: =1 to n doa[i]: =random (100); for i: =1 to n do beginif a[i]>=20 then begins: =s+a[i]; k: =k+1; end; end; sr: =s/k; write ('Средний балл ',sr: 3:1); end.2) const n=10; var a: array[1… n] of integer; i,nch,ch: integer; beginnch: =0; ch: =0; for i: =1 to n do begin a[i]: =random (100); write (',a[i]); end; writeln; for i: =1 to n do beginif (a[i] mod 2)=0) then ch: =ch+1elsench: =nch+1; end; writeln ('Четных ',ch); write ('Нечетных ',nch); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: