Решить на дан массив x(t). вычислить сумму положительных элементов массива с номерами меньшими 7, значение которых больших 15 (t³7) .

Danya0011 Danya0011    1   26.06.2019 12:20    2

Ответы
mrnikes2016 mrnikes2016  21.07.2020 10:22
Const t=10;
var
x: array [1..t] of integer;
s, i: integer;
begin
for i:=1 to t do
begin
x[i]:=random(51)-20;
writeln('x[', i, '] = ', x[i]);
if (x[i]>0) and (i<7) and (x[i]>15) then s:=s+x[i];
end;
writeln('Сумма равна ', s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика