Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
дано:
g= 44,1 кгц= 44100 гц
i= 16 бит
t=2 мин=120 сек
v-?
решение:
v=g*i*t
v= 44100гц*16 бит*120 сек= 8467200 бит
v= 8467200/8*1024*1024= 10 мбайт
program month;
uses crt;
var a: integer;
begin
clrscr;
write('vsatvte chislo');
read(a);
if (a=12) or (a=1) or (a=2) then write('zima')
else if (a=3) or (a=4) or (a=5) then write ('vesna')
else if (a=6) or (a=7) or (a=8) then write ('leto')
else write('oseni');
repeat until keypressed;
end.
var x,y: real;
read(x);
if x< =10 then y: = 210
else y: = x*x*x;
writeln(y);
495+459=954 954-459=495
Популярные вопросы