Txt, doc– расширения текстовых документов.
jpg, gif, png, tiff– расширения фотографий.
avi, mpg, mpeg, wmv – расширения видеофайлов.
xls– расширение электронных таблиц Excel.
htm, html – расширения Интернет-страниц.
hlp– расширение файлов-справки.
exe, com– расширения выполняемых программ.
rar, zip– расширения архивных файлов.
dll, lib, obj– расширения файлов-библиотек.<span>
</span>
Const
n = 50;// количество элем массиваvar
a: array [1..n] of integer;
kol, i: integer;begin
for i := 1 to n do
readln(a[i]);
for i := 2 to n - 1 do
if (a[i] > a[i + 1]) and (a[i] > a[i - 1]) then
kol := kol + 1;
writeln(kol);
end.
<span>110000=48
1100=12
001=1
__
31=11111
127=1111111
</span>