Задачи на тему «Обработка числовых последовательностей»

Вводится последовательность целых чисел, 0 — конец последовательности. Найти два наименьших числа. PROGRAM PRG2_4; VAR X, MIN1, MIN2: INTEGER;

Вводится последовательность из N целых чисел. Найти наибольшее число. PROGRAM PRG2_3; VAR N, X, MAX, I: INTEGER; BEGIN REPEAT WRITE(‘

Вводится последовательность из N целых чисел. Найти, сколько в ней нулей. PROGRAM PRG2_2; VAR N, X, К, I : INTEGER; BEGIN REPEAT WRITE(‘

Вводится последовательность из N целых чисел. Найти сумму всех отрицательных чисел. PROGRAM PRG2_1; VAR N, X, SUM, I : INTEGER; BEGIN REPEAT WRITE(‘

Обработка числовых последовательностей всегда основывается на использовании оператора цикла. Это может быть безусловный цикл FOR I:=N1 TO N2 DO <