Есть ответ 👍

Z. угадай число имя входного файла: стандартный ввод имя выходного файла: стандартный вывод ограничение по времени: 2 секунды ограничение по памяти: 256 мегабайт это интерактивная . в процессе тестирования ваша программа будет взаимодействовать с программой жюри с использованием стандартных потоков ввода/вывода. программа жюри загадала число от 1 до n, цель вашей программы — отгадать его. для этого ваша программа сообщает свои догадки программе жюри, а программа жюри отвечает, является ли загаданное число большим, меньшим или равным сделанной догадке. выполнено неравенство 1 ≤ n ≤ 109 . ваша программа должна сделать не более 30 догадок. протокол взаимодействия с программой жюри сначала ваша программа должна прочитать из стандартного потока ввода число n. затем протокол общения следующий: ваша программа выводит в стандартный поток вывода одну строку, содержащую число — свою догадку о загаданном числе. делайте сброс буфера потока вывода после каждой догадки. для этого используйте • flush(output) в паскале или delphi; • fflush(stdout) или cout.flush() в с/c++; • system.out.flush() в java. • sys.out.flush() в python. после этого программа должна считать из стандартного потока ввода одно число: ответ программы жюри. возможны следующие ответы: • 1 — загаданное число больше последней догадки; • −1 — загаданное число меньше последней догадки; • 0 — последняя догадка верна. считав 0, ваша программа должна завершиться. пример стандартный ввод стандартный вывод 5 -1 1 0 3 1 2

172
444
Посмотреть ответы 2

Ответы на вопрос:


Var     n, l, r, m, k: integer; begin     read(n);     l : = 1;     r : = n;     while (r - l > 1) do     begin         m : = (l + r) div 2;         writeln(m);         read(k);         if (k = 0) then             halt(0)         else if (k = 1) then             l : = m         else             r : = m;     end;     writeln(l);     read(k);     if (k < > 0) then         writeln(r); end.

//pascalabc.net v3.3 1633

var arr: array [1..13] of integer;

begin

  for var i: =1 to 13 do

    arr[i]: =random(-10,10);

  arr.println(', ');

 

  writeln('минимальный элемент: '+arr.;

  write('его индекс(ы): ');

  for var i: =1 to 13 do

    if arr[i]=arr.min() then write(i+' ');

end.

Популярно: Информатика