Войти Регистрация Спроси ai-bota

N= 12. подсчитать и вывести количество отрицательных элементов массива

Показать ответ

Ответ:

Игорь12463

19.08.2020 23:56

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";

ПОСТ
N = 12;

ПЕР
массив: РЯД N ИЗ ЦЕЛ;
отр, сч: ЦЕЛ;

УКАЗ
отр := 0;
ОТ сч := 0 ДО N - 1 ВЫП
ЕСЛИ массив[сч] < 0 ТО
УВЕЛИЧИТЬ(отр)
КОН
КОН;
Вывод.Цепь("%d", отр, 0, 0, 0)

КОН Задание.

0,0(0 оценок)

Популярные вопросы: Информатика

Sima121

05.09.2022 10:15

Какие графические рисунки могут быть легко редактированы (каждый из объектов может быть перемещен, удалён, уменьшен или увеличен)?...

TaKuRGRAF

16.04.2021 09:45

Почему никто не у меня мало времени осталось...

byxanceva6kv2

16.04.2021 09:45

2. Написать программу в которой значение к вводится с клавиатуры, при чем 0 100, затем вычисляетесли х 50 то у=х*10, если х=50 то у=х+50...

CCybermann

22.05.2020 18:05

Программа на паскале: даны длина и ширина прямоугольников. является ли он квадратом?...

Kristinkasssd001

22.05.2020 18:05

Сообщение занимает 3 страницы по 40 строк, в каждой строке записано 60 символов. информационный объём всего сообщения равен 14400 байтов. сколько двоичных разрядов было...

VladKot133

28.04.2022 23:09

Встреченно end , а ожидалось ; program n_1; var a, b : string; i, s, n: integer; begin n: =0; repeat writeln( введите слово ); readln(a); s: =length(a); for i: =1 to s...

ranilgalimzyanov

12.07.2021 10:20

Внекоторой стране автомобильный номер состоит из 6 символов. в качестве символов используют 30 различных букв и десятичные цифры в любом порядке. каждый такой номер в...

лиза22110

25.10.2021 00:19

Решите (2x+3)*4=28 64: (12-2x)=8 (14-3x): 4=2...

саня45рг

25.10.2021 00:19

Во сколько раз увеличилась территория римской республике к середине ||| в.до.н.э...

pbavaМАНЯ

25.10.2021 00:19

Образуйте от данных глаголов формы 2 и 3 лица ед. ч. слова клеить, выглядеть, бороться, мечтать , удержаться, качать, затеять, посвистывать, гладить , выскочить, выспаться,...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку