program n_3;
var a: array [1..30] of integer; n, m, l, i:integer; s: double;
begin
m:=0; l:=0;
for i:=1 to 30 do begin
read(a[i]);
s:=s+a[i];
if a[i]>=8 then m:=m+1;
if a[i]>l then begin l:=a[i]; n:=i; end;
end;
writeln ('Зачет сдали ', m, ' учеников');
writeln ('Среднее количество решенных задач равно: ', s/30);
writeln ('Больше всех решил задач ученик под номером ', n);
end.
Саму прогу засунунул в файл (тут пробелы иначе убираются), превью в картинке
1. 3
2. 2,4,5
3. хз) Навернное, 1,3,2,5,4, но не уверен.
4. 1б, 2а, 3в
5. 2
6. 3
7. хз, скорее всего 2
8. 3, странный вопрос)
9. 3
10. 2
11. 2
12. 1 или 3, хз
13. 3
14. 3
15. 2
Язык программирования устанавливает набор правил, определяющих внешний вид программы и действия, которые выполнит исполнитель под ее управлением.
А система программирования это внутренний код программы, который исполняет действия заданным в систему