Дан
10-11 класс
|
массив из N вещественных чисел. Выделить другим цветом все его
элементы, принадлежащие интервалу [a,b]
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]<b) then
textcolor(yellow)
else
textcolor(white);
write(mas[i],' ');
end;
textcolor(white);
end.
Комментарий удален
Комментарий удален
Другие вопросы из категории
давид, григорий, ольга, мария, светлана, екатерина. Антон живет в нарильске, борис и ольга-супруги, григорий и светлана не живут в одном городе, мария живет в москве, светлана-ростовчанка. Кто на ком женат, и кто где живет
файл,сжатие данных не производится. Получен файл размером 4000 Кбайт. определите глубину звука(разрешения)в битах
варианты ответов 2;8;16;24
Читайте также
передавать эти данные по другой линии связи со скоростью 4 Мбит/с. Сколько секунд пройдет от начала приема данных по высокоскоростному каналу до полной передачи их по низкоскоростному каналу?
выходных данных: Необходимо вывести значение выражения
Входные данные: ввести одно целое положительное число a ((1<=a<=1000).
Выходные данные: вывести слово «true» если приведенное высказывание для предложенных исходных данных является истинным или «false» в противном случае.
пользователем, выделены полужирным шрифтом).
Вычисление объема параллелепипеда.
Введите исходные данные:
Длинна (см): 9
Ширина (см): 7.5
Высота (см): 5