Предмет: Информатика,
автор: NikySimpson
В массиве A(n) хранится информация о результатах N спортсменов по плаванию на 100 м. Определить результаты спортсменов, занявших два последних места.
Программа получилась, но лишь от части, так как если задавать n=3, то всё работает нормально, но при задании большего числа программа сходит с ума и начинает нести какой-то бред.
Ответы
Автор ответа:
0
На паскале
const n=5;
var a:array[1..n] of integer;
i,m1,m2:integer;
begin
for i:=1 to n do read(a[i]);
if a[1]>a[2] then begin m1:=2; m2:=1 end else begin m1:=1; m2:=2 end;
for i:=3 to n doif a[i]<a[m1] then begin m2:=m1; m1:=i end else
if a[i]<a[m2] then m2:=i;
write(a[m1],' ',a[m2])
end.
const n=5;
var a:array[1..n] of integer;
i,m1,m2:integer;
begin
for i:=1 to n do read(a[i]);
if a[1]>a[2] then begin m1:=2; m2:=1 end else begin m1:=1; m2:=2 end;
for i:=3 to n doif a[i]<a[m1] then begin m2:=m1; m1:=i end else
if a[i]<a[m2] then m2:=i;
write(a[m1],' ',a[m2])
end.
Похожие вопросы
Предмет: Литература,
автор: bikeevamadina5
Предмет: Литература,
автор: nurzhanova19840615
Предмет: Қазақ тiлi,
автор: gulnazadilhanqyzy
Предмет: Биология,
автор: DM77
Предмет: Математика,
автор: Best2511