помню, в школе на информатике обясняли паскаль но мне тогда это нафиг не надо было
-=MTV=-, ну во первых я не у компа,а во вторых - небуду
Это до конца?
Составить программу для нахождения минимального и максимального элементов массива, а также индексов этих элементов. Ранжировать (упорядочить) одномерный массив п заданному признаку.
(2,56; 9,03; -2,0876; -187,5; 8,088; 12,6; - 0,76; 34,86; 0,2) по возрастанию
Код:
var a:array[1..9] of real; i,j,max,min:integer;
begin max:=1; min:=1;
for i:=1 to 9 do begin
readln(a[i]);
if a[max]<a[i] then max:=i;
if a[min]>a[i] then min:=i;
end;
writeln(min:5,a[min]:10,max:5,a[max]:10);
for i:=1 to 9 do begin
for j:=1 to 9 do begin
if a[i]<a[j] then begin
max:=a[i]; a[i]:=a[j]; a[j]:=max;
end;
end;
end;
for i:=1 to 9 do begin
writeln(a[i]);
end;
end.
DrFix, нас просят сделать в еклипсе аплет и страницу на которой аплет работает.
Тебе в куплю/продажу на веник, там с паскалем помогут