Program A1;
var a:array[1..30] of integer;
amax,amin,i,imin,imax,n,s:integer;
begin
writeln('введите n элементов массива');
readln(n);
for i:=1 to n do a[i]:=random(30);
writeln('введённый массив имеет вид');
for i:=1 to n do write(a[i], ' ');
writeln;
amax:=a[1]; imiax:=1;
for i:=2 to n do
if a[i]>amax then begin amax:=a[i]; imax:=i; end;
amin:=a[1]; imin:=1;
for i:=2 to n do
if a[i]<amin then begin amin:=a[i]; imin:=i; end;
writeln('полученный массив имеет вид');
s:=a[imin];
a[imin]:=a[imax];
a[imax]:=s;
for i:=1 to n do
writeln(a[i],' ');
end.
<html>
<head>
<title> Информация обо мне </title>
<body>
<h1> Информация обо мне<h1>
Фамилия Имя Отчество
Название школы
Номер класса
</body>
</head>
</html>
Объяснение:
p.s <title> Информация обо мне </title> можешь не писать это название страницы
<h1> Информация обо мне<h1> тоже можешь не писать это заголовок
и еще можешь цвета текста менять и размеры
<font color=red size= 5>
Фамилия Имя Отчество
Название школы
Номер класса
</font>
не слово а символ { }
Объяснение: