Вводится n чисел. определить сколько из них нулей.

Var   x: double;   i, k, n: integer; begin   k : = 0;   writeln('задайте количество вводимых чисел: '); readln(n);   writeln('введите ', n, ' чисел');   for i : = 1 to n do   begin       read(x);       if x = 0 then inc(k)   end;   writeln('введено нулей: ', k); end. тестовое решение: задайте количество вводимых чисел: 10 введите 10 чисел -5 3.6 0 11.52 0 0 -1 0 45.54 1.2e-4 введено нулей: 4

Begin
writeln(5);
writeln(55);
writeln(555);
writeln(5555);
end.

Мой компьютер — это ярлык главной папки ПК, в которой размещены все остальные файлыпапки.

Корзина — ярлык папки, в которой хранятся временно удаленные файлы.

--------------------
Пользовательские варианты папок:

Документы,
Игры,
Фото,
Очистка фотоаппарата_01.03.2017,
Школа,
Исследовательская работа.

Объем занимаемый одним пикселем i. k=2^i , где k кол-во цветов. 4=2^i, отсюда i=2 битам. Переведем 5 килобайт=5*1024 байт=5*1024*8 бит= 40960 бит - это будет I. Количество пикселей n=I/i=40960/2=20480 пикселей.