В данном массиве находится 4 элемента
1)2
2)-2
3)-2
4)2
Объем памяти в байтах/время записи в секундах/разрядность звуковой платы в байтах
1.3мб=1.3*1024*1024=1363148,8
минута это 60 сек
а глубина 16 это 16 бит, но так как требуются байты возьмем 2 конечно же
далее все по формуле
1363148,8/60/2= 11359.5733333Гц но помним для перевода в Кгц нужно не на 1000 а на 1024 делить
Гипертекст - это с<span>труктурированный текст, в котором могут осуществляться переходы по выделенным ссылкам.</span>
1) Первое задание:
var a: integer;
begin
write ('Введите число: ');
readln (a);
if (a mod 2 = 0) then
writeln ('Четное число')
else writeln ('Не четное');
readln;
end.
2) Второе задание:
program test;
var a: integer;
begin
write ('Введите число: ');
readln (a);
if a > 0 then
a:= a + 1;
if a < 0 then
a:= a - 2;
if a = 0 then
a:= 10;
writeln (a);
end.