Дан одномерный массив из 10 элементов. Элементы массива лежат в диапазоне от -20 до 20 и...

0 интересует 0 не интересует
53 просмотров

Дан одномерный массив из 10 элементов. Элементы массива лежат в диапазоне от -20 до 20 и обозначают температуру первой декады (10 дней) марта. Определите номера дней, когда температура опускалась ниже -10. Напишите программу, которая позволяет найти и вывести номера дней, когда температура опускалась ниже -10.


спросил от (40 баллов) в категории Информатика
оставил комментарий от (50 баллов)
0 0

массив вводится сам или через рандом(случайные числа)???

оставил комментарий от (40 баллов)
0 0

Через рандом

1 Ответ
0 интересует 0 не интересует
ответил от Одаренный (1.0k баллов)

CONST N=10;
VAR A:ARRAY[1..N] OF INTEGER;
I:INTEGER;
BEGIN 
FOR I:=1 TO N DO BEGIN
READ(A[I]);
IF A[I]< -10 THEN WRITE(I);
END;
END.

...