Смотри на фото. Там ответ.
64000 отсчёта в секунду * 2 байта на один отсчёт (так как 16 бит) * 2 канала = 256000 байт в секунду = 256000/1024 = 250 кБайт/с
64 Мбайт = 64 * 1024 кБайт = 65536 кБайт
длительность записи = 65536 кБайт / 250 кБайт/с = 262,144 с = 262,144 / 60 = 4.369 минуты
Ответ: 4 минуты
Program bit;
var m,a1,a2,a3:
integer;
begin
writeln('введите три числа');
readln(a1,a2,a3);
if (a1<a2) and (a1<a3) then m:=a1;
if (a2<a1) and (a2<a3) then m:=a2;
if (a3<a1) and (a3<a2) then m:=a3;
if (a1=a2) and (a1=a3) then
writeln('они равны')
else writeln('меньшее из трёх ',m);
<span>end.</span>
//Pascal ABC.NET v3.1 сборка 1172
begin
Var seq:=SeqWhile(ReadInteger(),x -> ReadInteger(),x -> x<>0).ToArray;
writeln(seq.Select((x,i)->Rec(x,i+1)).Where(x->x.Item1=seq.Min).Select(x->x.Item2));
end.
Пример ввода:
2
3
4
0
Пример вывода:
<span>[1]</span>
18. - а)
19. - д)
20. - Надо отмечать их на картинке... Где картинка paint'а?