{ У тебя было <span>two+theere+fore+five, т.е. ты складываешь все тройки четверки и тд и делишь на их количество, т.е. всегда будет "1", нужно посчитать сумму и поделить на количество. Подправил твой код:}</span> program p1; const n=20; var i,a1,two,theere,fore,five,sum:integer; sr:double; a:array[1..20] of integer; begin two:=0; theere:=0; fore:=0; five:=0; sr:=0; sum:=0; for i:=1 to n do begin read(a1); sum:= sum + a1; a[i]:=a1; if a[i]=2 then two:=two+1; if a[i]=3 then theere:=theere+1; if a[i]=4 then fore:=fore+1; if a[i]= 5 then five:=five+1;
1 . обычный режим; режим Web-документа; режим разметки страницы; режим структуры документа; схема документа; во весь экран; режим предварительного просмотра.
2 . режим разметки страницы
3. Enter
4. 1) «Alt» +«0151». Цифры на цифровой клавиатуре, которая находится справа, при включенном «NumLock».
1-С) достоверность - отражает истинное положение дел 2-Е) точность - степень близости к реальному состоянию объекта 3-В) ценность - важность при решении задач <span>4-D) понятность - </span>выраженность на языке доступном для получателя информации <span>5-А) своевременность - </span>актуальность информации