Тема:
Информатика
Подтемы:
-
Знакомство с языком программирования
(107 задач)
Алгоритмы
(155 задач)
Математика
(39 задач)
Информатика (прочее)
(3 задачи)
Фильтр
Задачи
Страница: << 2 3 4 5 6 7 8 >> [Всего задач: 277]
Страница: << 2 3 4 5 6 7 8 >> [Всего задач: 277]
Задача 64160 |
|
|
Большая сортировка Дано число N (1<=N<=100000), а затем N натуральных чисел из диапазона от 1 до 100. Выведите N чисел в неубывающем порядке Пример входного файла 5 3 1 2 4 2 Пример выходного файла 1 2 2 3 4
|
|
Решение |
Задача 64161 |
|
|
Вам дана программа, решающая 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.
|
|
|
Решение |
Задача 64162 |
|
|
Результаты олимпиады N участников олимпиады получили уникальные номера от 1 до N. В результате решения задач на олимпиаде каждый участник получил некоторое количество баллов (целое число от 0 до 600). Известно, кто сколько баллов набрал. Требуется перечислить участников олимпиады в порядке невозрастания набранных ими баллов. Входные данные. Вводится сначала число N (1<=N<=100) - количество участников олимпиады. Далее вводится N чисел - количества набранных участниками баллов (1-е число - это баллы, набранные участником номер 1, 2-е - участником номер 2 и т.д.) Выходные данные. Выведите в выходной файл N чисел - номера участников в порядке невозрастания набранных ими баллов (участники, набравшие одинаковое количество баллов могут быть выведены в любом порядке). Пример входного файла 5 100 312 0 312 500 Пример выходного файла 5 2 4 1 3
|
|
|
Решение |
Задача 64163 |
|
|
Количество операций
Дана программа сортировки (p141.pas). Требуется узнать, сколько раз
при сортировке конкретного массива с помощью этой программы
выполняется операция сравнения двух элементов массива (строка 25 программы).
Входные данные
В файле input.txt записан массив в формате (и удовлетворяющий ограничениям)
из задачи 136.
Выходные данные
В файл output.txt ваша программа должна печатать одно число - сколько
раз в процессе сортировки этого массива программой p141.pas выполнится
команда сравнения двух элементов массива.
Пример входного файла
5
3 1 2 4 2
Пример выходного файла
10
Текст программы p141.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, то после выполнения
команды: }
if i<>g then begin
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;
end;
{Выводим результат}
for i:=1 to n do
write(f2,a[i],' ');
close(f1);
close(f2);
end.
|
|
|
Решение |
Задача 64165 |
|
|
ГАИ Вдоль шоссе в точках X1,X2,...,XN расположены посты ГАИ. В точке X произошло мелкое ДТП (дорожно-транспортное происшествие). Требуется определить, какой из постов ГАИ расположен ближе всего к этой точке, чтобы с него послать к месту происшествия наряд милиции. Входные данные Во входном файле записано сначала число N - количество пунктов ГАИ. (1<=N<=100) Далее следуют координаты расположения постов ГАИ на прямом шоссе (целые числа от -10000 до 10000). Далее идет координата точки, в которой произошло ДТМ (целое число от -10000 до 10000). Выходные данные В выходной файл требуется вывести одно число - номер поста ГАИ, с которого нужно послать наряд к месту ДТП. Если несколько постов ГАИ находятся на одинаковом расстоянии от точки ДТП, выведите любой из них. Пример входного файла 5 10 2 8 -7 3 7 Пример выходного файла 3
|
|
|
Решение |
Страница: << 2 3 4 5 6 7 8 >> [Всего задач: 277]
