ЗАДАЧИ
problems.ru
О проекте | Об авторах | Справочник
Каталог по темам | по источникам |
К задаче N

Проект МЦНМО
при участии
школы 57
Фильтр
Сложность с по   Класс с по  
Выбрано 2 задачи
Версия для печати
Убрать все задачи

Вам дана программа, решающая 136 задачу (p139.pas).
Требуется найти в ней ошибку, и объяснить (письменно
или устно), почему так происходит.

Текст программы p139.pas

const nmax=100;

var a:array[1..nmax] of integer;
    n:integer;
    i,j,g:integer;

    f1,f2:text;

begin
assign(f1,'input.txt');
reset(f1);
assign(f2,'output.txt');
rewrite(f2);
                                  {Чтение входных данных}
read(f1,n);
for i:=1 to n do read(f1,a[i]);
                                  {Сортировка массива}

for i:=1 to n do begin            {Подбираем число на i-ое место}

  g:=i;                           {Считаем, что самое маленькое число,
                                   которое нам встретилось, стоит на месте i}

  for j:=i+1 to n do              {Перебираем все числа с i+1 до конца массива}
    if a[j]<a[g] then g:=j;       {Если нашли число, которое меньше,
                                   чем то, что уже найдено, запоминаем его}

                                  {Меняем местами числа, стоящие на i-ом и
                                   на g-ом местах }
                                  {Если a[i]=x, a[g]=y, то после выполнения
                                   команды: }
  a[i]:=a[i]+a[g];                {a[i]=x+y, a[g]=y}
  a[g]:=a[i]-a[g];                {a[i]=x+y, a[g]=(x+y)-y=x}
  a[i]:=a[i]-a[g];                {a[i]=(x+y)-x=y}
                                  {То есть после этого a[i]=y, a[g]=x
                                   обмен значений произошел}

  end;

                                  {Выводим результат}
for i:=1 to n do
  write(f2,a[i],' ');
close(f1);
close(f2);
end.

Вниз   Решение


Автор: Ботин Д.А.

Резидент одной иностранной разведки сообщил в центр о готовящемся подписании ряда двусторонних соглашений между пятнадцатью бывшими республиками СССР. Согласно его донесению, каждая из них заключит договор ровно с тремя другими. Заслуживает ли резидент доверия?

Вверх   Решение

Задачи

Страница: << 1 2 [Всего задач: 8]      



Задача 103757

Темы:   [ Степень вершины ]
[ Четность и нечетность ]
Сложность: 3
Классы: 7

Автор: Ботин Д.А.

Резидент одной иностранной разведки сообщил в центр о готовящемся подписании ряда двусторонних соглашений между пятнадцатью бывшими республиками СССР. Согласно его донесению, каждая из них заключит договор ровно с тремя другими. Заслуживает ли резидент доверия?

Прислать комментарий     Решение


Задача 103758

Темы:   [ Невыпуклые многоугольники ]
[ Примеры и контрпримеры. Конструкции ]
Сложность: 3
Классы: 7,8,9

Может ли горящая в комнате свеча не освещать полностью ни одну из её стен, если в комнате а) 10 стен, б) 6 стен?

Прислать комментарий     Решение


Задача 103754

Тема:   [ Задачи на движение ]
Сложность: 3+
Классы: 7,8

Петя и Витя ехали вниз по эскалатору. Посередине эскалатора хулиган Витя сорвал с Пети шапку и бросил её на встречный эскалатор. Пострадавший Петя побежал обратно вверх по эскалатору, чтобы затем спуститься вниз и вернуть шапку. Хитрый Витя побежал по эскалатору вниз, чтобы затем подняться вверх и успеть раньше Пети. Кто успеет раньше, если скорости ребят относительно эскалатора постоянны и не зависят от направления движения?

Прислать комментарий     Решение

Страница: << 1 2 [Всего задач: 8]      



© 2004-... МЦНМО (о копирайте)
Пишите нам

Проект осуществляется при поддержке Департамента образования г.Москвы и ФЦП "Кадры" .