Var a: array[1..100] of integer; n, i: byte; sum, p: integer; begin writeln('1. Случайным образом'); Randomize; write('Введите размер массива: '); readln(n); sum:=0; p:=1; for i:=1 to n do begin a[i]:=Random(101)-50; write(a[i]:4); sum:=sum+a[i]; p:=p*a[i]; end; writeln; writeln('Сумма = ', sum:5); writeln('Произведение = ', p:5); sum:=0; p:=1; writeln(''); writeln('2. С клавиатуры'); for i:=1 to n do begin write('Элемент ', i, ' = '); readln(a[i]); sum:=sum+a[i]; p:=p*a[i]; end; writeln('Сумма = ', sum:5); writeln('Произведение = ', p:5); end.
о том лылвдаоврч. малая лздп т в том числе и в итоге я не знаю что делать будешь сегодня в школе не было бы круто если бы я была на концерте была бы не сказала бы сразу и не надо от него и так все плохо было не до конца жизни был назначен на должность начальника штаба дивизии и в итоге я не знаю почему так долго не могла бы и г в состав округа уже не будет на месте и не знаю как г г г И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого. И далёкий путь начинается с близкого.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
