Функциональные клавиши,символьные ( алфавитно- цифровые) клавиши, клавиши управления курсором, специальные клавиши , клавиши дополнительной клавиатуры.
Чаще всего отказывают, но бывают некоторые исключения
Program aaa;
var
a,b,c,n,i:longint;
M:array[1..1000000] of real;
begin
read(n); //
for i:=1 to n do //если считывать массив не нужно, то удалить
read(M[i]); //
a:=0;
b:=0;
c:=0;
for i:=1 to n do
begin
if M[i]>0 then inc(a);
if M[i]=0 then inc(b);
if M[i]<0 then inc(c)
end;
writeln('положительных элементов:',a);
writeln('нулевых элементов:',b);
writeln('отрицательных элементов:',c)
<span>end.</span>
Вариант программы без массива:
#include <iostream>
using namespace std;
int main() {
int n, a, k = 0;
cin >> n;
for (int i=0; i<n; i++) {
cin >> a;
if (a % 10 == 6) k++;
}
cout << k << "\n";
return 0;
}
Пример:
5
420
836
705
379
706
2
<span>1 символ в кодировке Виндовс-1251 = 1 байт.
1536 симв.*1 байт/симв. = 1536 байт.
1536 / 1024 = 1,5кБайт.
</span>