Дано:
t = 2 мин=120 c
f = 44100 Гц
i = 22 бит
V = ?
Решение:
V = f*t*i
V = 44100*120*22 = 116424000 бит <span>~ 13,88 Мбайт</span>
Значит надо нарисовать таблицу истинности для всех возможных комбинаций значений A и B. Таких комбинаций будет 2^2=4
A B A+B A+(A!*B)
1 1 1 1
1 0 1 1
0 1 1 1
0 0 0 0
640 умножить на 240 = 163840 пикселей
Var a:array[1..30] of integer;
i:integer;
begin
for i:=1 to 30 do
begin a[i]:=2*i;
write(a[i],' ');
end;
end.
Ответ:
var t1,t2:text; c:char; f:boolean;
begin
assign(t1,'INPUT.TXT');
reset(t1);
assign(t2,'OUTPUT.TXT');
rewrite(t2);
f:=true;
while not eof(t1) and f do
begin
read(t1,c);
f:=f and (c='1');
end;
if f then writeln(t2,'YES')
else writeln(t2,'NO');
close(t1);
close(t2);
end.