в паскале нужна программа,которая поменят два элемента первый и последний
заранее спасибо) от 1 до 20
9 класс
Ответы на вопрос
Ответил Celldweller
0
Не помню как там с объявлением переменных, но если брать основную часть, то:
begin
a:=0;
b:=mas[1];
max=0;
for (int i:=1;i<=20;i:=i+1)
{
if (mas[i]>max)
{
max:=mas[i];
a:=i;
}
mas[1]:=mas[a];
mas[a]:=b;
begin
a:=0;
b:=mas[1];
max=0;
for (int i:=1;i<=20;i:=i+1)
{
if (mas[i]>max)
{
max:=mas[i];
a:=i;
}
mas[1]:=mas[a];
mas[a]:=b;
Ответил vasya709
0
writeln;
max:=a[i]; k:=1;
for i:=2 to 20 do
if a[i]>max then
begin
max:=a[i]; k:=i;
end;
max:=a[i]; k:=1;
for i:=2 to 20 do
if a[i]>max then
begin
max:=a[i]; k:=i;
end;
Ответил vasya709
0
вот как я написал, но мне почему-то меняет только максимальный стит на первое место а вот на место максимального первый элемент не становится(
Ответил Celldweller
0
Потому что ты ставишь на первое место max, а вместо него забыл
после a[1]:=max, нужно было добавить a[k]:=c (а так ты просто в переменную max:=c записываешь первый элемент)
после a[1]:=max, нужно было добавить a[k]:=c (а так ты просто в переменную max:=c записываешь первый элемент)
Ответил vasya709
0
аааа) точняяк) спасиибо) выручил!!)
Новые вопросы