Выводится на экран последовательность 20 случайных чисел из промежутка
10-11 класс
|
[-10,10]. Определить количество отрицательных чисел больших -5 в данной
последовательности.
var
a:array[1..1000]of integer;
i,k:integer;
begin
for i:=1 to 20 do
a[i]:=random(20)-10;
for i:=1 to 20 do
write(a[i],' ');
for i:=1 to 20 do begin
if (a[i]<0)and(a[i]>(-5))
then k:=k+1;
end;
writeln;
writeln(k);
end.
Другие вопросы из категории
окружности (лежит ли точка внутри окружности на окружности или вне ее) Если можно полностью
1)( x^{4} +18x)/tg(x+1)
2) Из трех заданных чисел определить, какие делятся на 3 и 5
Тип данных Массив от 1 до 10 с элементами типа Integer создать алгоритм который вычеслит произведение парных чисел
Читайте также
последовательности.
Программу реализовать с помощью трех циклических алгоритмов:
1) Цикл со счетчиком for
2) Цикл с предусловием while
3) Цикл с постусловием repeat
В программе предусмотреть ситуацию, когда пользователь вводит значение B ‹ A
Пример 1:
Пользователь вводит числа A=5, B=10. Сумма чисел: 5+6+7+8+9+10. Вывод на экран: 45
Пример 2:
Пользователь вводит числа A=7, B=4. Сумма чисел: 4+5+6+7. Вывод на экран: 22
Пример 3:
Пользователь вводит числа A=5, B=5. Сумма чисел: 5. Вывод на экран: 5
2.Вывести на экран 10 строк, содержащие символ *, причем количество * в каждой строке должно быть равно номеру строки.
3.Пользователем вводится 2 целых числа. Вывести на экран сумму положительных четных чисел, находящихся в границах диапазона, указанного пользователем.
4. В результате работы программы формируется массив, состоящий из 10 элементов и заполненный случайными числами от 0 до 100. Вывести на экран этот же массив в порядке возрастания.
5.Вводится строка, содержащая буквы и цифры разного регистра (т.е. строчные и прописные буквы). В результате работы программы на экран выводится строка следующего вида: цифры в порядке возрастания, строчные буквы по алфавиту, прописные буквы по алфавиту.
2. Написать прогрумму,которая выводит на экран, разность значений двух вещественных массивов из 10 элементов.
подсчитать количество отрицательных элементов
сумму положительных элементов
ВЫВОДИТ НА ЭКРАН НОМЕРА ВСЕХ ЭЛЕМЕНТОВ, ЗНАЧЕНИЯ КОТОРЫХ =0