Перевод программы с Pascal на java [требует правки]

288
17 апреля 2017, 03:49

Сама программа:

var
  a : array [1..100000] of Longint;
  n, k, i, z, first, last, mid : Longint;
  fin, fout : Text;
begin
  Assign(fin, 'input.txt'); Assign(fout, 'output.txt');
  Reset(fin); Rewrite(fout);
 
  ReadLn(fin, n, k);
  for i := 1 to n do Read(fin, a[i]); ReadLn(fin);
 
  for i := 1 to k do
    begin
      Read(fin, z);
      if (z < a[1]) or (z > a[n]) then
        WriteLn(fout, 'NO')
      else
        begin
          first := 1; last := n + 1;
          while first <> last do
            begin
              mid := first + (last - first) div 2;
              if z <= a[mid] then
                last := mid
              else
                first := mid + 1;
            end;
          if a[last] = z then
            WriteLn(fout, 'YES')
          else
            WriteLn(fout, 'NO');
        end;
    end;
  
  Close(fin); Close(fout);
end.

Ну или кто поможет решить задачу на java?

Для каждого из K чисел вывести в отдельную строку "YES", если число встречается в первом массиве.

READ ALSO
Java. Как архивировать только определенные файлы из папки в один архив

Java. Как архивировать только определенные файлы из папки в один архив

Всем приветМожет вопрос банальный, но в Java я новичок и никак не могу додуматься

278
Теряется сессия при вызове сервлета

Теряется сессия при вызове сервлета

Прохожу авторизацию через JDBCRealm/j_security_checkСоздается сессия, на странице вызываю request

212
WhatsApp web в android WebView

WhatsApp web в android WebView

Какой user-agent нужно использовать для отображения webwhatsapp

291
использование 2-x asynctaskloader

использование 2-x asynctaskloader

Использую в фрагменте загрузчик который возвращает данные с Api, хочу еще добавить реализацию одного загрузчика который будет возвращать...

202