2)
uses crt;
const n=random(50);
var a:array[1..n]of integer;
i,min,max,s,k:integer;
begin
clrscr;min:=11;writeln('оценки ',n+1,' судей');
for i:=1 to n do
a[i]:=random(10);
write(a[i],' ');
if a[i]> max then max:=a[i];
if a[i]<min then min:=a[i];
end;
if (a[i]=min)or(a[i]=max) then begin write(i,' судья поставил минимальный или максимальный балл');writeln;end;
if (a[i]<>min)and(a[i]<>max) then begin s:=s+a[i];k:=k+1;end;
writeln('среднее значение оценок судей ',(s/k):1:1);
end.
1)Uses crt;
const n=5;
Var a:array[1..n]of integer;
i,min,km:integer;
begin clrscr; randomize;
a[i]:=Random(100);
writeln;
min:=a[1];
km:=1;
for i:=2 to n do if a[i]<min then
min:=a[i];
km:=i;
writeln('Mimimalnoe chislo a[',km,']=',min);
min:=100;
for i:=2 to n do if (a[i]<min)and(a[i]mod 2=0) then
writeln('Naimenshee chetnoe cislo a[',km,']=',min);
readln;
Добрый день,
#include <iostream>
int main() {
auto a, b, c, e, f;
std::cin >>a >> b >> c; // вводим три числа
std::cin >> e >> f; // вводим промежуток
if (a < f & & a > e) { // проверяем, если число принадлежит отрезку, выводим его
std::cout << a << " " ;
}
if (b < f & & b > e) {// проверяем, если число принадлежит отрезку, выводим его
std::cout << b << " " ;
if (c < f & & c > e) {// проверяем, если число принадлежит отрезку, выводим его
std::cout << c << " " ;
return 0;
Вот ваша программа язык С++
2)
uses crt;
const n=random(50);
var a:array[1..n]of integer;
i,min,max,s,k:integer;
begin
clrscr;min:=11;writeln('оценки ',n+1,' судей');
for i:=1 to n do
begin
a[i]:=random(10);
write(a[i],' ');
if a[i]> max then max:=a[i];
if a[i]<min then min:=a[i];
end;
for i:=1 to n do
begin
if (a[i]=min)or(a[i]=max) then begin write(i,' судья поставил минимальный или максимальный балл');writeln;end;
if (a[i]<>min)and(a[i]<>max) then begin s:=s+a[i];k:=k+1;end;
end;
writeln('среднее значение оценок судей ',(s/k):1:1);
end.
1)Uses crt;
const n=5;
Var a:array[1..n]of integer;
i,min,km:integer;
begin clrscr; randomize;
for i:=1 to n do
begin
a[i]:=Random(100);
write(a[i],' ');
end;
writeln;
min:=a[1];
km:=1;
for i:=2 to n do if a[i]<min then
begin
min:=a[i];
km:=i;
end;
writeln('Mimimalnoe chislo a[',km,']=',min);
min:=100;
km:=1;
for i:=2 to n do if (a[i]<min)and(a[i]mod 2=0) then
begin
min:=a[i];
km:=i;
end;
writeln('Naimenshee chetnoe cislo a[',km,']=',min);
readln;
end.
Добрый день,
#include <iostream>
int main() {
auto a, b, c, e, f;
std::cin >>a >> b >> c; // вводим три числа
std::cin >> e >> f; // вводим промежуток
if (a < f & & a > e) { // проверяем, если число принадлежит отрезку, выводим его
std::cout << a << " " ;
}
if (b < f & & b > e) {// проверяем, если число принадлежит отрезку, выводим его
std::cout << b << " " ;
}
if (c < f & & c > e) {// проверяем, если число принадлежит отрезку, выводим его
std::cout << c << " " ;
}
return 0;
}
Вот ваша программа язык С++