СОСТАВИТЬ ПРОГРАММУ НА ПАСКАЛЕ ДЛЯ ВВОДА С КЛАВИАТУРЫ 15 ЧИСЕЛ И ВЫВОДА НОМЕРОВ ОТРИЦАТЕЛЬНЫХ ЭЛЕМЕНТОВ . ПОСЛЕ ЗАМЕНИТЬ ЭТУ ПРОГРАММУ НА ОПЕРАТОР WHILE - №1109828

СОСТАВИТЬ ПРОГРАММУ НА ПАСКАЛЕ ДЛЯ ВВОДА С КЛАВИАТУРЫ 15 ЧИСЕЛ И ВЫВОДА НОМЕРОВ ОТРИЦАТЕЛЬНЫХ ЭЛЕМЕНТОВ .

ПОСЛЕ ЗАМЕНИТЬ ЭТУ ПРОГРАММУ НА ОПЕРАТОР WHILE
- Предмет:
  Информатика
- Автор:
  sarah9
- 6 лет назад

Ответы 1

var a:array[1..15]of integer;x,i:integer;begini:=1;while i<16 do beginreadln(x);if x<0 then a[i]:=x;inc(i);end;for i:=1 to 15 do if a[i]<0 then writeln(i);end.
- Автор:
  fred70
- 6 лет назад
- 0
Добавить свой ответ

Еще вопросы

How much to ban the user?

1 hour 1 day 100 years