Вмассиве из 15 чисел введенных с клавиатуры,найти количество элементов не превышающих 200
Masha200605
2
12.04.2019 14:06
0
Другие вопросы по теме Информатика
sasasnikas
10.11.2020 06:32
kristinakarpen
10.11.2020 06:49
help275
10.11.2020 07:06
lizasolnce2004
10.11.2020 07:09
Aleksandra1111117
10.11.2020 07:31
Dashka2005Dashka2005
10.11.2020 07:32
оксана731
10.11.2020 07:33
IKramarenko
10.11.2020 07:34
Популярные вопросы
- Тауда журген таргыл ан ол-кайратты туынды сын есимди табу?...
1 - Васюткино озеро « что герою выжить в тайге? »...
3 - Для каких животных характерна лучевая симметрия тела? выберите несколько...
2 - Определите изобразительно-выразительные средства в стихотворение города...
1 - Решите систему уравнений: {2х+у=1 {5х+2у=0...
2 - 10 песен в которых раскрываются самые главные черты характера (народные)...
3 - Бегемот жираф панда слон носорог какой из этих животных обитает только...
2 - Разложите на множители x^3-2x cm-cn+3m-3n...
1 - Определи вид предложения.какие нужны знаки препинания в конце предложений?...
1 - Турист от леса к озеру км,а от озера до деревни 9км.во сколько раз...
1
var a:array [1..15] of integer ;
i,col:integer;
begin
for i:=1 to 15 do
begin
readln(a[i]);
if a[i]>200 then col:=col+1;
end;
writeln('Колічесто: ',col);
end.
Объяснение: