В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Daryanaa7
Daryanaa7
23.03.2023 13:02 •  Информатика

Поросёнок Ниф-Ниф решил продолжить карьеру строителя домов. Он учел ошибки , поэтому теперь он будет строить дома из сена не себе, а другим зверям.
На строительство одного дома уходит W стогов сена. Так как сено на дороге не валяется, было
решено закупать его у фермеров. i-й фермер продает неограниченное количество стогов за ai монет
каждый. Покупателей поросенок также нашел, j-й покупатель готов купить дом за bj монет.
Ниф-Ниф решил не рисковать, и для начала построить и продать только один дом
поросёнку максимизировать прибыль.
Формат входных данных
В первой строке входного файла записаны три числа: N, M и W — количества продавцов, количество покупателей и количество стогов, необходимых для постройки одного дома (1 6 N 6 2 · 105
,
1 6 M 6 2 · 105
, 5 6 W 6 106
).
Во второй строке даны N чисел ai — цены стогов сена у фермеров(1 6 ai 6 106
).
В третьей строке даны M чисел bj — цены, за которые покупатели готовы купить дом
(1 6 bj 6 106
).
СДЕЛАЙТЕ НА ПИТОНЕ

Показать ответ
Ответ:
GrafGundam
GrafGundam
07.03.2020 02:54

Задание 1:

var i:integer;

begin

   for i:=1 to 20 do writeln('2^',i,'=',exp(i*ln(2)):0:0)

end.

Задание 2:

Мало деталей...N чисел вводятся вручную или они генерятся автоматически рандомно?

var i,min,n,x:integer;

begin

   min:=9999;

   write('Количество чисел: '); readln(n);

   for i:=1 to n do begin

       write('Введите ',i,'-е число: '); readln(x);

       if x < min then min:=x

   end;

   write('Минимальное из введённых чисел равно ', min);

end.

Задание 3:

var i,x:integer;

   chk:boolean;

begin

   chk:=True;

   write('Введите натуральное число: '); readln(x);

   for i:=2 to x-1 do begin

       if x mod i = 0 then begin

           chk:=False;

           break;

       end;

   end;

   if chk = True then write('Введённое число является простым.')

   else write('Введённое число не является простым.');

end.

0,0(0 оценок)
Ответ:
misterzol1
misterzol1
24.05.2022 04:23

1. Компьютерная графика - область деятельности, в которой компьютеры наряду со специальным программным обеспечением используются в качестве инструмента как для создания (синтеза) и редактирования изображений, так и для оцифровки визуальной информации, полученной из реального мира, с целью дальнейшей её обработки и хранения.

2. Компьютерная анимация, Графика для Интернета, Художественная и рекламная графика, Научная графика

3. ЧАСТЫЕ ОБНОВЛЕНИЕ

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

РАБОТА СО СЛОЯМИ

Окно слоёв. Как правило только дорогие или очень сложные профессиональные программы позволяют работать со слоями изображений. Paint.NET предлагает это бесплатно и в форме которая не усложняет их восприятие

МОЩНЫЕ ИНСТРУМЕНТЫ

Paint.NET содержит простые инструменты для рисования фигур, включая легкий в использовании инструмент для рисования сплайнов или кривых Безье

БЕСПЛАТНОСТЬ

Paint.NET является полностью бесплатной программой. Вы можете свободно установить ее и использовать неограниченное количество времени. При этом Paint.NET не содержит никаких шпионских модулей или рекламных дополнений.

4. Интерфейс

Строка заголовка В строке заголовка указывается имя открытого изображения (если ещё не присвоено, то Безымянный) и версия paint.net.

Строка меню

Панель инструментов

Список изображений

Холст

Окно инструментов

Окно истории

Окно слоев

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота