Регистрация
МиллкаВах
05.10.2021 14:34
Информатика
Есть ответ 👍

Дан одномерный массив u из n элементов, значения которых находятся в диапозоне от -100 до 100 заменить все отрицательные элементы на нули. вывести на экран исходный и новый массив

223
389
Посмотреть ответы 1

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

Abtun
Abtun
4,4(29 оценок)

Объяснение:

var

 n, i, k, m: integer;

 

begin

 k := 0;

 readln(n);

 for i := 1 to n do

 begin

   readln(m);

   if (m mod 5 = 0) and (m mod 10 = 0) then

     inc(k)

 end;

 writeln(k);    

end.

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