см.пояснение
Объяснение:
#include <iostream>
#include <cstdlib>
#include <ctime>
using namespace std;
const int n=499;
int main() {
srand(time(0));
int arr[n],min=100,max=-100,iter=0,mediana;
for (int i=0;i<n;i++){
arr[i]=rand()%200-100;
if (min>arr[i])
min=arr[i];
if (max<arr[i])
max=arr[i];
}
for (int i=0;i<n;i++){
if(arr[i]==max)
iter++;
}
int swap;
for (int i=0;i<n-1;i++){
for (int j=i+1;j<n;j++){
if (arr[i]>arr[j]){
swap=arr[i];
arr[i]=arr[j];
arr[j]=swap;
}
}
}
mediana=n/2+1;
mediana=arr[mediana];
cout<<"min = "<<min<<endl;
cout<<"max = "<<max<<" povtorov: "<<iter<<endl;
cout<<"mediana = "<<mediana;
return 0;
}
1) переменная P не нужна
2) переменная s отсутствует в разделе описания переменных
3) индексы массива в разделе описания переменных не соотносятся с циклами
4) неправильно написан randomiz
5) ненужные точки с запятой после do
6) неправильный оператор присваивания у s
7) неверно оформленный вывод данных
Объяснение:
Примерный вариант программы с исправлениями:
program n_3;
var i,s:integer;
a: array[1..15] of integer;
begin
s:=0;
randomize;
for i:=1 to 15 do a[i]:=random(10);
for i:=1 to 15 do s:=s+a[i];
writeln('s=',s)
end.
Возможно, отсутствие вывода элементов массива, тоже можно считать ошибкой.
Const
n=3; //количество строк
m=4; //количество столбцов
Var
f:text;
ma:array[1..n,1..m] of integer;
i,j,s:integer;
begin
assign(f,'matrix.txt');
reset(f);
for i:=1 to n do
begin
for j:=1 to m do
begin
read(f,ma[i,j]);
s:=s+ma[i,j];
end;
end;
close(f);
for i:=1 to n do
begin
writeln;
for j:=1 to m do
write(ma[i,j]:4);
end;
writeln;
write(s);
end.
matrix.txt:
1 2 3 4
4 5 6 4
7 8 9 4
Вывод программы:
1 2 3 4
4 5 6 4
7 8 9 4
57