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

231

494

Посмотреть ответы 3

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

T1mon4ikRYTP

Информатика

4,7(87 оценок)

Var a,s,p,m: real; begin writeln('введи число'); readln(m); s: =0; p: =1; writeln('введи массив чисел'); repeat readln(a); s: =s+a; p: =p*a; until s> m; writeln('произведение элементов равно ',p); writeln('сумма элементов равна ',s); end.

nmh788

Информатика

4,5(100 оценок)

Const n=10000; var b: array[1..n] of integer; a,s,p,i: integer; begin readln(a); i: =1; p: =1; s: =0; while s< =a do begin readln(b[i]); s: =s+b[i]; p: =p*b[i]; i: =i+1; end; writeln('произведение элементов = ',p); end.

Alekseev709

Информатика

4,8(5 оценок)

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