Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 979 ответов!

Дан массив из N целых элементов и целое число B.Написать программу, определяющую, сколько в массиве чисел, меньших В.

5-9 класс

Egor868 28 февр. 2017 г., 13:01:22 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
ValeriaWorsnop
28 февр. 2017 г., 15:22:51 (7 лет назад)

Program Task;
Const N = 10;
Var a: Array [1..N] of Integer;
i, B, count: Integer;
Begin
    Write('B = ');
    ReadLn(B);
    WriteLn('Введите ', N, ' элементов через пробел');
    For i := 1 To N Do
    Begin
        Read(a[i]);
        If a[i] < B Then
            count := count + 1;
    End;
    WriteLn('Количество элементов, меньших ', B, ' равно ', count);
    ReadLn;
End.
    

Ответить

Другие вопросы из категории

превратить слово рота в слово полк
напите дату и век

Начало книгопечатания в Европе.
Появление алфавитного письма в Финикии.
Появление первых лазерных дисков.
Первые следы иероглифического письма в Древнем Египте.
Начало книгопечатания в России.
Появление первых жестких дисков для компьютеров.
изобретение магнитофона.
Изобретение фотографии.
первая запись звука с помощью фонографа.
Демонстрация первого кинофильма.

Помоги!срочно нужно !!

Читайте также

1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.

2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.

1.Дано целое число N.Написать программу ,увеличивающую число в 3 раза ,если оно больше нуля

2.Дано целое число N.Написать программу ,заменяющую его нулём ,если больше или равно нулю,и увеличивающая его в 2 раза ,если число меньше нуля.
3 .Дано целые числа a и b .Написать программу , которая выводит сначала большее число ,затем меньшее.
4.Даны числа a,b,c.Написать программу ,выводящую их в возрастающем порядке.
ПЛИЗ ПОМОГИТЕ

1). Дан миссив из n целых чисел. Напишите программу определяющую сколько в массиве четных чисел, 2). Дан массив из n целых чисел. Напишите

программу определяющую каких элементов в точке больше положительных или отрицательных

решить через паскаль через массивы)) 1.Дан одномерный массив из 10 элементов. Заменить все большие 7 члены массива числом 7. Найти количество

таких членов.

2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.

3.Дан массив из 10 элементов. Найти наибольший элемент массива.

Дан массив из 8 целочисленных элементов. Элементы вводятся с клавиатуры (все элементы

различны). Найти минимальный элемент численного массива и его порядковый номер.



Вы находитесь на странице вопроса "Дан массив из N целых элементов и целое число B.Написать программу, определяющую, сколько в массиве чисел, меньших В.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.