Регистрация
dasha198156
08.05.2022 00:28
Информатика
Есть ответ 👍

Напишите,программу ! найдите первые n членов последовательности,заданной формулой n-го элемента хn=2n-1​

127
483
Посмотреть ответы 1

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

theknow14
theknow14
4,4(75 оценок)

const n=15;

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

i,k: integer;

begin

for i: =1 to n do

begin

a[i]: =random(21)-10;

if a[i] mod 2 < > 0 then a[i]: =a[i]+1

end;

writeln('исходный массив: ',a);

for i: =1 to n do

if a[i] < 0 then

begin

a[i]: =0;

k: =k+1

end;

writeln('преобразованный массив: ',a);

writeln('отрицательных элементов было: ',k)

end.

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