# data[].attributes.headline
Булгаков Роман

# data[].attributes.subject
Булгаков Роман

# data[].attributes.headline
Гарипова Амелия дз

# data[].attributes.subject
Гарипова Амелия дз

# data[].attributes.headline
Гариповой Азалии 

# data[].attributes.subject
Гариповой Азалии 

# data[].attributes.attachment_link.title
Гариповой Азалии

# data[].attributes.headline
Ушаков Георгий

# data[].attributes.subject
Ушаков Георгий

# data[].attributes.body
массивы

# data[].attributes.attachment_link.readable_text
5)const n=10;

var a:array[1..n]of integer;

i,im:integer;

begin

for i:=1 to n do begin

read(a[i]);

write(a[i],' '); end;

writeln; im:=1;

for i:=1 to n do

if a[i]>a[im] then

im:=i;

writeln('ÐÐ°ÐºÑÐ¸Ð¼Ð°Ð»ÑÐ½ÑÐ¹ ÑÐ»ÐµÐ¼ÐµÐ½Ñ ÑÐ°Ð²ÐµÐ½ ',a[im],', Ð° ÐµÐ³Ð¾ Ð¸Ð½Ð´ÐµÐºÑ ÑÐ°Ð²ÐµÐ½ ',im);

end.

6)const

n = 10;

var

a: array[1..n] of integer;

k, c, i, sum: integer;

sr: real;

begin

sum := 0;

sr := 0;

k := 0;

randomize;

write('ÐÐ²ÐµÐ´Ð¸ÑÐµ ÑÐ¸ÑÐ»Ð¾ C: ');

readln(c);

for i := 1 to n do

begin

a[i] := -44 + random(79);

write(a[i]:4);

if a[i] > c then

begin

sum := sum + a[i];

inc(k);

end;

end;

sr := sum / k;

writeln;

if k <> 0 then

writeln('Ð¡ÑÐµÐ´Ð½ÐµÐµ Ð°ÑÐ¸ÑÐ¼ÐµÑÐ¸ÑÐµÑÐºÐ¾Ðµ: ', sr)

else

writeln('ÐÐµÑ ÑÐ°ÐºÐ¸Ñ ÑÐ¸ÑÐµÐ»');

end.

7)program zz1;

const n = 5;

var i:integer;

A:array [1..n] of integer;

begin

for i:=1 to n do

read(A[i]);

for i:=1 to n do

if A[i] mod 2 = 1 then

write(' ', A[i]);

end.

8)var a:array[1..100] of integer;

n,i,j,k,max,buf:integer;

begin

randomize;

repeat

write('ÐÐ²ÐµÐ´Ð¸ÑÐµ ÑÐ°Ð·Ð¼ÐµÑ Ð¼Ð°ÑÑÐ¸Ð²Ð° Ð¾Ñ 10 Ð´Ð¾ 100 n=');

readln(n);

until n in [10..100];

writeln('ÐÑÑÐ¾Ð´Ð½ÑÐ¹ Ð¼Ð°ÑÑÐ¸Ð²');

for i:=1 to n do

begin

a[i]:=-54+random(88);

write(a[i]:4);

end;

writeln;

//ÑÐ¾ÑÑÐ¸ÑÐ¾Ð²ÐºÐ° Ð²ÑÐ±Ð¾ÑÐ¾Ð¼ Ð¿Ð¾ ÑÐ±ÑÐ²ÑÐ½Ð¸Ñ

for i:=1 to n-1 do

begin

max:=i;

for j:=i+1 to n do

if a[j]>a[max] then max:=j;

if a[max]>a[i] then

begin

buf:=a[i];

a[i]:=a[max];

a[max]:=buf;

end;

end;

writeln('ÐÑÑÐ¾ÑÑÐ¸ÑÐ¾Ð²Ð°Ð½Ð½ÑÐ¹ Ð¼Ð°ÑÑÐ¸Ð²');

for i:=1 to n do

write(a[i]:4);

end.

# data[].attributes.attachment_link.title
Ушаков Георгий массивы

# data[].attributes.headline
Мустафина Илона

# data[].attributes.subject
Мустафина Илона

# data[].attributes.headline
Дуброва Арина

# data[].attributes.subject
Дуброва Арина

# data[].attributes.headline
Гринчук Никита,массивы 

# data[].attributes.subject
Гринчук Никита,массивы 

# data[].attributes.attachment_link.readable_text
5)const n=10;
var a:array[1..n]of integer;
i,im:integer;
begin
for i:=1 to n do begin
read(a[i]);
write(a[i],' '); end;
writeln; im:=1;
for i:=1 to n do
if a[i]>a[im] then
im:=i;
writeln('ÐÐ°ÐºÑÐ¸Ð¼Ð°Ð»ÑÐ½ÑÐ¹ ÑÐ»ÐµÐ¼ÐµÐ½Ñ ÑÐ°Ð²ÐµÐ½ ',a[im],', Ð° ÐµÐ³Ð¾ Ð¸Ð½Ð´ÐµÐºÑ ÑÐ°Ð²ÐµÐ½ ',im);
end.
6)const
n = 10;
var
a: array[1..n] of integer;
k, c, i, sum: integer;
sr: real;
begin
sum := 0;
sr := 0;
k := 0;
randomize;
write('ÐÐ²ÐµÐ´Ð¸ÑÐµ ÑÐ¸ÑÐ»Ð¾ C: ');
readln(c);
for i := 1 to n do
begin
a[i] := -44 + random(79);
write(a[i]:4);
if a[i] > c then
begin
sum := sum + a[i];
inc(k);
end;
end;
sr := sum / k;
writeln;
if k <> 0 then
writeln('Ð¡ÑÐµÐ´Ð½ÐµÐµ Ð°ÑÐ¸ÑÐ¼ÐµÑÐ¸ÑÐµÑÐºÐ¾Ðµ: ', sr)
else
writeln('ÐÐµÑ ÑÐ°ÐºÐ¸Ñ ÑÐ¸ÑÐµÐ»');
end.
7)program zz1;
const n = 5;
var i:integer;
A:array [1..n] of integer;
begin
for i:=1 to n do
read(A[i]);
for i:=1 to n do
if A[i] mod 2 = 1 then
write(' ', A[i]);
end.
8)var a:array[1..100] of integer;
n,i,j,k,max,buf:integer;
begin
randomize;
repeat
write('ÐÐ²ÐµÐ´Ð¸ÑÐµ ÑÐ°Ð·Ð¼ÐµÑ Ð¼Ð°ÑÑÐ¸Ð²Ð° Ð¾Ñ 10 Ð´Ð¾ 100 n=');
readln(n);
until n in [10..100];
writeln('ÐÑÑÐ¾Ð´Ð½ÑÐ¹ Ð¼Ð°ÑÑÐ¸Ð²');
for i:=1 to n do
begin
a[i]:=-54+random(88);
write(a[i]:4);
end;
writeln;
//ÑÐ¾ÑÑÐ¸ÑÐ¾Ð²ÐºÐ° Ð²ÑÐ±Ð¾ÑÐ¾Ð¼ Ð¿Ð¾ ÑÐ±ÑÐ²ÑÐ½Ð¸Ñ
for i:=1 to n-1 do
begin
max:=i;
for j:=i+1 to n do
if a[j]>a[max] then max:=j;
if a[max]>a[i] then
begin
buf:=a[i];
a[i]:=a[max];
a[max]:=buf;
end;
end;
writeln('ÐÑÑÐ¾ÑÑÐ¸ÑÐ¾Ð²Ð°Ð½Ð½ÑÐ¹ Ð¼Ð°ÑÑÐ¸Ð²');
for i:=1 to n do
write(a[i]:4);
end.

# data[].attributes.headline
Иванова Анастасия

# data[].attributes.subject
Иванова Анастасия

# data[].attributes.attachment_link.title
Иванова Анастасия 9Б

# data[].attributes.headline
Солдатова Лина 

# data[].attributes.subject
Солдатова Лина 

# data[].attributes.attachment_link.title
Солдатова Лина 9б, массивы

# data[].attributes.attachment_link.title
Нгуен Винь, массивы