Есть ответ 👍

Шестиклассники аня боря вася галя даша и иван получили в подарок флешки на 1 2 4 8 16 32 гигабайта выясните кто из получил флешку с самого большого и кто самого маленького объема если известноследующее: у ани объем флешки меньше чем у бори, у васи больше чем у гали , у даши меньше чем у ивана у васи меньше чем у ани ,у даши больше чем у бори

242
282
Посмотреть ответы 2

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

tnata007
4,7(100 оценок)

Иван - 32 gb даша - 16  gb боря - 8  gb аня - 4  gb вася - 2  gb галя - 1  gb

Type   v = array of integer; function prodpos(a: v): longint; var   i: integer; begin   result : = 1;   foreach var p: longint in a do       if p > 0 then result : = result * p end; procedure initmas(var a: v; title: string); var   i: integer; begin   writeln(title, '(', length(a, 0), '). вводите элементы.');   for i : = 0 to length(a, 0) - 1 do       read(a[i]) end; procedure getmas(var a: v; dim: integer; title: string); begin   setlength(a, dim);   initmas(a, title); end; const   n1 = 10;   n2 = 15; var   a, b: v; begin   getmas(a, n1, 'массив а');   getmas(b, n2, 'массив b');   writeln('большее произведение положительных ', max(prodpos(a), prodpos( end. тестовый прогон: массив а(10). вводите элементы. 1 1 1 1 2 1 2 2 1 5 массив b(15). вводите элементы. 1 0 2 4 0 1 -3 -4 1 2 3 1 -3 0 2 большее произведение положительных 96

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