Program ok; var a,i,n,proiz: integer; begin readln(n); proiz: =1; for i: =1 to n do begin read(a); if(a< 0) then proiz: =proiz*a; end; write(proiz); end.
Спасибо
Ответ дал: Гость
чем меньше разница между длиной и шириной, тем меньше периметр, минимальный периметр при одной и той же площади получается, если
длина равна ширине т.е надо извлечь корень из 2500= 50 м длина и 50 м - ширина
(50+50)*2=50*4=200 м сетки рабицы понадобится
Ответ дал: Гость
х стр - перепечатывает в час первая машинистка
х+0,5 стр - вторая
за 1 час они вместе перепечатают х+х+0,5=2х+0,5 (стр)
Популярные вопросы