Регистрация
natashazlata
31.01.2023 07:37
Информатика
Есть ответ 👍

Напишите программу, оптимизирующую диаметр и высоту тонкой жестяной банки объемом один литр, исходя из минимума затрат на металл, пошедший на ее изготовление Язык программирования: любой. Желательно Pascal или Python3

199
247
Посмотреть ответы 1

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

Uoywex
Uoywex
4,5(57 оценок)

PascalABC.Net

begin

 var n := ReadInteger('Размер массива');

 var a := ReadArrInteger(n);

 a.Println;

 var b := a.Where(z -> z > 0);

 b.Println;

end.

Тестовое решение:

Размер массива 5

4

-5

-3

3

2

4 -5 -3 3 2

4 3 2

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