Есть ответ 👍

Товарищи, нужна а) В ожесточенном бою 70 из 100 пиратов потеряли глаз, 80 – руку, 85 –
ногу, 40 – глаз и руку, 50 – глаз и ногу, 55 – руку и ногу. Сколько пиратов
потеряли глаз, руку и ногу?

б) Исследователь рынка сообщает следующие данные. Из 1000
о нравится шоколад, 752 – мармелад, 418 – зефир, 570 –
шоколад и мармелад, 356 – шоколад и зефир, 348 – мармелад и зефир, а 297 –
все три вида сладостей. Показать, что в этой информации есть ошибки.

в) На загородную прогулку поехали 92 человека. Бутерброды с колбасой
взяли 48 человек, с сыром – 38 человек, с ветчиной – 42 человека, с сыром и
колбасой – 28 человек, с колбасой и ветчиной – 31 человек, с сыром и ветчиной
– 26 человек. 25 человек взяли с собой все три вида бутербродов, а несколько
человек вместо бутербродов взяли пирожки. Сколько человек взяли с собой
пирожки?

г) На вступительном экзамене по математике были предложены три
задачи: по алгебре, планиметрии и стереометрии. Из 1000 абитуриентов задачу
по алгебре решили 800, по планиметрии – 700, а по стереометрии – 600
абитуриентов. При этом задачи по алгебре и планиметрии решили 600
абитуриентов, по алгебре и стереометрии – 500, по планиметрии и
стереометрии – 400. Все три задачи решили 300 абитуриентов. Существуют ли
абитуриенты, не решившие ни одной задачи, и если да, то сколько их?

189
302
Посмотреть ответы 2

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

ilya1613
4,6(82 оценок)

1 a 2 b

Объяснение:

Dffgvfh
4,6(29 оценок)

Program bally; var a: array[1..250] of string; n,l,max,x,i,b,p: integer; z,k: string; begin max: =0; readln(n); for i: =1 to n do readln(a[i]); z: =a[1]; l: =pos(' ',z); delete(z,1,l); l: =pos(' ',z); delete(z,1,l); val(copy(z,1,pos(' ',z)-1),x,l); max: =max+x; delete(z,1,pos(' ',z)); val(copy(z,1,pos(' ',z)-1),x,l); max: =max+x; delete(z,1,pos(' ',z)); val(z,x,l); max: =max+x; for i: =2 to n do begin z: =a[i]; b: =0; l: =pos(' ',z); delete(z,1,l); l: =pos(' ',z); delete(z,1,l); val(copy(z,1,pos(' ',z)-1),x,l); b: =b+x; delete(z,1,pos(' ',z)); val(copy(z,1,pos(' ',z)-1),x,l); b: =b+x; delete(z,1,pos(' ',z)); val(z,x,l); b: =b+x; if b> max then max: =b; end; for i: =1 to n do begin z: =a[i]; b: =0; l: =pos(' ',z); p: =l; delete(z,1,l); l: =pos(' ',z); p: =p+l; delete(z,1,l); val(copy(z,1,pos(' ',z)-1),x,l); b: =b+x; delete(z,1,pos(' ',z)); val(copy(z,1,pos(' ',z)-1),x,l); b: =b+x; delete(z,1,pos(' ',z)); val(z,x,l); b: =b+x; if b=max then begin z: =a[i]; delete(z,p,length(z)-p+1); writeln(z); end; end; end. наверное

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS