Найти количество элементов массива больших чем его первый элемент

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

гуля5182

02.10.2021 14:36

Визначте приблизний обсяг даних на сторінці підручника...

вопросик70

04.07.2021 00:32

Як запустити на виконання програму таблиця символів?...

Дария008

17.05.2021 08:30

Төменде бірнеше есептеу құрылғылары берілген. Үлгіге қарап, оларды пайда болу реті мен дәптерлеріңе жазып шығыңдар....

dju3

05.03.2020 13:52

Заранее ) напишите 10 примеры векторной графики...

maximusru05

12.02.2022 00:57

Переведите, , текст программы паскаля в кумир : разработайте алгоритм определения, является ли введённое натуральное число однозначным, двухзначным, трёхзначным или многозначным...

alexanders4234

12.02.2022 00:57

Переведите, , текст программы паскаля в кумир : разработайте алгоритм, который получает на вход слово и число, а затем выводит это слово указанное число раз. паскаль: var text1:...

арма6

04.03.2022 04:57

Решите , чем скорее тем лучше. Заранее ....

DanyaHD

05.12.2020 08:51

Знайдіть координати вектора АВ та його модуль: 1) A(7;-2) , B(6;0) ; 2) A(2;7) , B(4;11) ....

Мерлинbrother2

12.02.2020 07:34

Ребра прямоугольника равны 25см и 16см, чему равен небольшой квадрат....

Homoeopath

03.05.2021 10:24

EUR ACTIVATE Ask and answer the questions. 1 What languages do you think are very difficult? Why? 2 Which languages are interesting or important for you? 3 Say the English alphabet....

Ответ:

ФархадАсланов

02.10.2020 11:41

Var
k,s,i:longint;
m:array[1..100] of longint;
begin
writeln('Введите количество элементов в массиве');
read(k);

writeln('Введите элементы массива');
for i:=1 to k do
read(m[i]);

s:=0;

for i:=1 to k do
if m[i]>m[1] then s:=s+1;

writeln(s);
end.

0,0(0 оценок)

Ответ:

Krooop04

02.10.2020 11:41

Egsdgpsdgadiogjasklgja

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку