Назад   Задать вопрос
Информатика
9 класс
5 отметок
+ В закладки
23.11.2014, 15:12

составьте программу , которая позволяет ввести элементы массива a [1..10] с клавиатуры и выводит на экран количество отрицательных элементов и их индексов

Комментарии (0)

Решить задание

Добавить ответ, могут только Зарегистрированные или Авторизированные пользователи.

Ответы и решения


05.09.2015, 01:59
Паскаль.
var a:array [1..10] of integer;
begin
writeln(' Введите 10 элементов массива через пробел');
i:=1;
repeat
read(a[i]);
i:=i+1;
until i>10;
k:=0;
for i:=1 to 10 do
if a[i]<0 then begin k:=k+1; write(i, ' '); end;
writeln;
if k=0 then write('В массиве нет отрицательных элементов') else write('В массиве ',k,' отрицательных элементов');
readln;
end.

Оценка: 4.0 (голосов: 1)

Комментарии (0)