1. Информатика
  2. Дано ціле число n і набір з

Дано ціле число n і набір з n прямокутників, своїми
сторонами – парами чисел (a, b). знайти максимальний периметр
прямокутника з даного набору.

skromnikplay skromnikplay    3   27.09.2019 19:47    1

Ответы
tanyushalyubim tanyushalyubim  08.10.2020 23:20

program bla;

var

 n, i: integer;

 a, b, P, Pmax: real;

begin

 Readln(n);

 for i := 1 to n do

 begin

   Read(a, b);

   P := (a + b) * 2;

   if Pmax < P then

     Pmax := P

 end;

 Writeln(Pmax);

end.

Объяснение:


Дано ціле число n і набір з n прямокутників, своїми сторонами – парами чисел (a, b). знайти максимал
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
EseniyaMaster EseniyaMaster  17.01.2021 09:20
Погода с 11 янв. до 17 янв аа​...
joker2284 joker2284  14.06.2019 03:20
Какое количество информации несёт фраза, записанная в однобайтной кодировке: информатика...
artyomortega artyomortega  14.06.2019 03:20
Вкодировке кои-8 жадный символ копируется одним байтом.определите информационный объем следующего предложения в данной кодировке: у сильного всегда бессильный виноват....
Kari200511 Kari200511  14.06.2019 03:20
Считая,что каждый симво кодируется 16-ю битами оцините информационный обьем следующей фразы в кодировки unicode. в шести литрах 6000 миллилитров...
Fynerka Fynerka  14.06.2019 03:20
Pbvjq b ktnjv jlybv wdtnjv перевести...
ksu2407 ksu2407  14.06.2019 03:10
16. в базе данных хранятся записи, содержащие информацию о датах. каждая запись содержит три поля: год (число от 1 до 2100), номер месяца (число от 1 до 12) и номер...
PolinaZaichko0403 PolinaZaichko0403  14.06.2019 03:10
Вшкатулке находятся нитки,иголки и тесьма,но все надписи неверные.что где на самом деле,если в желтой шкатулке не нитки?...
ArinaMiji ArinaMiji  14.06.2019 03:10
1. в настоящее время рекорд гиннесса по скорости чтения составляет 60 000 знаков в минуту (примерно 60 страниц текста) (установлен россиянкой). если учащийся младших...
Артём1228777 Артём1228777  14.06.2019 03:10
Нужно составить линейную программу для решения . даны два числа x и y. вычислить их сумму, произведение, разность и частное. (qbasic) ....
665609 665609  14.06.2019 03:10
Получение символов расположенных вместе с цифровыми в верхнем ряду клавиатуры...

Популярные вопросы