obar1
?>

Чернильные Топи Имя входного файла: стандартный ввод Имя выходного файла: стандартный вывод Ограничение по времени: 0.5 секунд Ограничение по памяти: 256 мегабайт Чернильные Топи — довольно спокойный уголок Нивена. Здесь можно гулять, любоваться видами природы, шумом озера, а также рыбачить. Неудивительно, что именно здесь проходил XX чемпионат по ловле рыбы среди Моки. Участники должны были любым поймать как можно больше рыбы за отведенное время. Известно, что i-ый участник выловил ai мокиграммов рыбы. И вот, теперь настала пора награждать победителей. Организаторы хотят определить победителей следующим образом: • В соревновании должно быть ровно два победителя. Очевидно, что победители это такие Моки, что первый Моки выловил рыбы не меньше чем второй, а второй выловил не меньше чем все остальные (кроме него и первого • Из всех подходящих под предыдущие условия пар победителей нужно выбрать такую, что сумма их номеров минимальна. организаторам определить, возможно ли определить победителей, и если да, то определите, каким образом это можно сделать. Формат входных данных В первой строке на вход подается одно целое положительное число n (2 6 n 6 105 ). Далее во второй строке на вход подаются n целых положительных чисел ai (1 6 ai 6 109 ). Формат выходных данных Если ответа не существует, выведите -1. Иначе выведите четыре целых положительных числа в следующем формате: в первой строке выведите два числа: количество рыбы, пойманной первым победителем, и его номер; во второй строке выведите два числа: количество рыбы, пойманной вторым победителем, и его номер; Количество рыбы, пойманной первым победителем, должно быть не меньше, чем количество рыбы, пойманной вторым победителем. Если эти количества совпадают, то номер первого победителя должен быть меньше, чем номер второго.

Информатика

Ответы

Ligacom
1)

program raf105;

var i,j,del:integer;

begin

for i:=10 to 99 do

begin

 del:=0;

 for j:=1 to i do

 begin

   if (i mod j)=0

     then del:= del+1;

 end;

 if del=3

   then writeln(i);

end;  

end.

2)

program raf105;

var a,b,c:integer;

x:boolean;

begin

write('Введите число: ');

readln(a);

write('Введите искомую цифру: ');

readln(c);

while a<>0 do

begin

 b:= a mod 10;

 if x=false

   then x:= b=c;

 a:= (a-b) div 10;

end;

if x

 then writeln('В ведённом числе есть искомая цифра')

 else writeln('В ведённом числе нет искомой цифры');

end.

3)

a) 2

b) 1

c) 0

d) 1

e) бесконечно

Язык программирования PascalABC

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Чернильные Топи Имя входного файла: стандартный ввод Имя выходного файла: стандартный вывод Ограничение по времени: 0.5 секунд Ограничение по памяти: 256 мегабайт Чернильные Топи — довольно спокойный уголок Нивена. Здесь можно гулять, любоваться видами природы, шумом озера, а также рыбачить. Неудивительно, что именно здесь проходил XX чемпионат по ловле рыбы среди Моки. Участники должны были любым поймать как можно больше рыбы за отведенное время. Известно, что i-ый участник выловил ai мокиграммов рыбы. И вот, теперь настала пора награждать победителей. Организаторы хотят определить победителей следующим образом: • В соревновании должно быть ровно два победителя. Очевидно, что победители это такие Моки, что первый Моки выловил рыбы не меньше чем второй, а второй выловил не меньше чем все остальные (кроме него и первого • Из всех подходящих под предыдущие условия пар победителей нужно выбрать такую, что сумма их номеров минимальна. организаторам определить, возможно ли определить победителей, и если да, то определите, каким образом это можно сделать. Формат входных данных В первой строке на вход подается одно целое положительное число n (2 6 n 6 105 ). Далее во второй строке на вход подаются n целых положительных чисел ai (1 6 ai 6 109 ). Формат выходных данных Если ответа не существует, выведите -1. Иначе выведите четыре целых положительных числа в следующем формате: в первой строке выведите два числа: количество рыбы, пойманной первым победителем, и его номер; во второй строке выведите два числа: количество рыбы, пойманной вторым победителем, и его номер; Количество рыбы, пойманной первым победителем, должно быть не меньше, чем количество рыбы, пойманной вторым победителем. Если эти количества совпадают, то номер первого победителя должен быть меньше, чем номер второго.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

aleksvasin
sashakrav
Корягина
buleckovd8724
djevgen
ajuli2
ERodina1
razumeiko0790
Yurevna419
svo1961
magazin3000
moonligh3560
Иван1764
dakimov
neganovaarxi