Регистрация
Аnимeшka
12.08.2022 12:22
Информатика
Есть ответ 👍

(pascal) - найти количество отрицательных элементов одномерного- динамического массива а[n] состоящего из элементов целого типа.

197
479
Посмотреть ответы 2

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

iphoneX10
iphoneX10
4,5(35 оценок)

var a: array of integer;

i,n,k: integer;

begin

write('введите количество элементов массива: ');

readln (n);

a: =new integer[n];

write ('массив: ');

for i: =0 to n-1 do

begin

a[i]: =random(199)-99;

if a[i] < 0 then k: =k+1;

write (a[i]: 5);

end;

writeln;

write ('количество отрицательных элементов ',k)

end.

plyushka1
plyushka1
4,5(93 оценок)
Процессор

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