Дан

массив из N вещественных чисел. Выделить другим цветом все его

элементы, принадлежащие интервалу [a, b]

Question

Информатика

Луня

7 февраля, 13:11

Дан

массив из N вещественных чисел. Выделить другим цветом все его

элементы, принадлежащие интервалу [a, b]

+1

Ответы (1)

Знаете ответ на вопрос?

Евдокиюшка · Answer 1

Uses crt;

var a, b, n, i:integer;

mas:array[1 ... 100] of integer;

begin

textcolor (white) ;

writeln ('Введите a, b, n:') ;

read (a, b, n) ;

writeln ('Введите элементы массива:') ;

for i:=1 to n do

read (mas[i]) ;

for i:=1 to n do

begin

if (mas[i]>a) and (mas[i]
textcolor (yellow)

else

textcolor (white) ;

write (mas[i],' ') ;

end;

textcolor (white) ;

end.

Данмассив из N вещественных чисел. Выделить другим цветом все егоэлементы, принадлежащие интервалу [a, b]

Дан

массив из N вещественных чисел. Выделить другим цветом все его

элементы, принадлежащие интервалу [a, b]