Pascal
Вводится произвольная последовательность целых чисел . Найти количество элементов меньших наперед заданного числа а.
Нет комментариев
Ответы

//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ReadlnString('Вводите').ToIntegers; mas.println;
var a:=readinteger('Введите число a:');
Writeln('Количество чисел которые меньше а=',mas.Where(t->t<a).Count);
end.

Нет комментариев
Похожие вопросы
Информатика
Помогите с информатикой пожалуйста!...
Информатика
Помогите пожалуйста....