Есть ответ 👍

Составьте задачу по абсолютной и относительной ссылке и решите её.

143
284
Посмотреть ответы 1

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


// pascalabc.net 3.3.5, сборка 1636 от 10.03.2018 // внимание! если программа не работает, обновите версию! begin   // создание файла   var f: file of integer;   var n: =20; // размер файла   randomize;   rewrite(f,'f.bin');   var b: integer;   loop n do begin       b: =random(-50,50);       write(f,b)       end;   f.close;   // вывод содержимого исходного файла   reset(f,'f.bin');   while not f.eof do print(f.read);   writeln;   // нахождение суммы четных компонент файла   // в связи с двусмысленностью условия считается, что   // понятие четности применяется к значению компоненты.   f.reset;   var s: =f.readelements.where(t-> t.iseven).sum; // -48   // увеличение на значение суммы отрицательных компонент   // второй половины файла   f.seek(f.filesize div 2);   while not f.eof do begin       b: =f.read;       if b< 0 then begin           b+=s;           f.seek(f.filepos-1);           write(f,b)           end       end;   // удаляем минимальную компоненту   f.reset;   var a: =f.readelements.toarray;   var imin: =a.indexmin;   a: =(a? [: imin]+a? [imin+1: ]).toarray;   f.reset;   foreach b in a do write(f,b);   f.truncate;   // вывод содержимого полученного файла   f.reset;   while not f.eof do print(f.read);   writeln;   f.close end. пример -21 20 37 -30 6 -32 -25 45 -15 -12 0 31 20 -47 -42 41 -38 36 26 -2 -21 20 37 -30 6 -32 -25 45 -15 -12 0 31 20 -90 41 -86 36 26 -50 замечание чтобы получить именно такие данные, укажите в программе randomize(3);

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

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

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS