Написать программу на паскале, которая вводит массив из n целых чисел и выводит на экран номера отрицательных элементов и сами эти элементы. протестировать программу для следующих массивов: а) 3 5 -2 0 -6 -8 1 б) -1 -2 -3 0 -1 2 3 массивы должны вводися вручную а не рандомно.
Zhuchkov270302
1
14.03.2019 18:00
58 
Популярные вопросы
- 1.Соотнеси виды росписи при стрелок...
3 - Іван Карпенко-Карий Хазяїн СОПОСТАВИТЬ СОБЫТИЯ В ПРАВИЛЬНОМ ПОРЯДКЕ...
1 - Напишите сочинение по литературе на тему:《Смысл побега мцыри из...
1 - Составить туристический маршрут Монастыри Подмосковья...
3 - спалить будете заблокирую...
3 - Объясните роль антитеза в произведении О. Сулейменова Последнее...
2 - Даны точки A(10;4) и B(8;18). Найди координаты точек C и D, если...
1 - Read the text and tick T for true or F for false. Polar Bears are...
1 - Охарактеризуйте Марии и Фрица...
3 - Является ли данный ряд чисел рядом кратных и если да, то какого...
3
var a: array[1..100] of integer;
n, i: integer;
begin
write('Введите количество элементов массива');
readln(n);
write('Вводите элементы массива отделяя их клавишей "Enter"');
for i:=1 to n do
read(a[i]);
for i:=1 to n do
if a[i]<0 then write('число ', a[i], ', номер ', i,'; ' );
end.