Презентация, доклад по информатике на тему Одномерные массивы

ОДНОМЕРНЫЕ МАССИВЫ

разными способами,
– уметь обрабатывать.


– подружиться с массивами!

имеющих общее имя.

А[2]
Двумерные

А
А[2,3]

a[4] a[5] a[6] a[7]

a:array[1..1000] of integer;

-10 0 10

Задать массив, заполнить его случайными числами из интервала
[-10;10] и найти
- количество положительных,
отрицательных и нулевых элементов;
- суммы положительных и
отрицательных элементов.

program zadacha;
var n, i, kp, ko, kn, sp, so: integer;
a:array[1..1000] of integer;
begin
kp:=0; ko:=0; kn:=0; sp:=0; so:=0;
write('Введите количество элементов n=');
readln(n);

a[i]:=random(21)-10;
write(a[i]:5);
end;
writeln;

then begin kp:=kp+1;
sp:=sp+a[i]; end;
if a[i]<0 then begin ko:=ko+1;
so:=so+a[i]; end;
if a[i]=0 then kn:=kn+1;
end;

элементов =', kp);
writeln ('Количество отрицательных
элементов =', ko);
writeln ('Количество нулей =', kn);
writeln ('Сумма положительных
элементов =', sp);
writeln ('Сумма отрицательных
элементов =', so);
end.

- удалить
write (a[i]:5);
write (' a[ ', i , ' ]= '); - вставить
readln (a[i]);
end;
writeln;

элемент,
максимальный элемент
и т. д.
выполнить?
сортировку,
перестановку,
- замену
и т. д.

М А Н И Е !