<span>var
i:integer;
begin
i:=2;
while i<=100 do
begin
write (i,' ');
i:=i+2;
end;
end.</span>
С:
/ \
рисунки мои документы
| |
времена года 7 класс
/ \ |
снеговик.bmp открытка.bmp литература
|
сочинение.doc
Формула для определения информационного объёма звукового байла:
N = k L f t
k - количество каналов (1 для моно, 2 для стерео)
L - глубина кодирования (количество информации в одном измерении)
f - частота (количество измерений в секунду)
t - продолжительность записи
1) N = 1 * 8 бит * 8000 Гц * 10 с = 640 000 бит = 80 000 байт = 78,1 Кб
2) N = 2 * 16 бит * 48000 Гц * 10 с = 15 360 000 бит = 1 920 000 байт = 1875 Кб = 1,8 Мб
Ш1А - школа (1 - кол), ЗА1КА - заколка, 1БЕГ - разбег (1 - раз), 1УМ - разум, 2Д - парад (2 - пара)
Var n: longint;
k: integer;
begin
k:=0;
write('Введите число: ');
readln(n);
while n>0 do
begin
if n mod 10 mod 2<>0 then
k:=k+1;
n:=n div 10;
end;
writeln('В числе ',k,' нечетных цифр');
readln;
<span>end.</span>