Регистрация
maryana070803
01.08.2020 16:13
Информатика
Есть ответ 👍

Надо 9 класс информатика ( напишите полную программу, лучший ответ ! ) написать программу: заполнить массив из 20 элементов случайными числами на интервале [-20, 25]. найти произведение элементов с четными номерами.

182
349
Посмотреть ответы 2

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

Настятвсердечко
Настятвсердечко
4,8(75 оценок)

var a: array [1..20] of integer;

i: integer;

p: real;

begin

p: =1;

for i: = 1 to 20 do

begin

a[i]: = random(46)-20;

if i mod 2 = 0 then p: =p*a[i]

end;

writeln('массив: ',a);

writeln('произведение элементов с чётными номерами равно: ',p);

end.

Bairachock
Bairachock
4,6(48 оценок)
Ответ: 14 обоснование: var x,y : integer; begin   x: =1;   y: =2*x;   y: =y+3;   y: =y*x;   y: =y+4;   y: =y*x;   y: =y+5;   writeln(y); end. общая формула вычисления: ((2*x+3)*x+4)*x+5

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