Вычисление количества элементов массива, удовлетворяющих условию
Задание:
Обнулить все отрицательные элементы массива и посчитать количество остальных
Задание:
Обнулить все отрицательные элементы массива и посчитать количество остальных
const
N = 20;
var
a: array [1..N] of integer;
i, j, max: integer;
begin
for i := 1 to N do
readln(a[i]);
...
end.
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть