Program n1;
var n: integer;
begin
readln(n);
case n of
1..5: write('рабочий день');
6..7: write('выходной день');
else write('ошибка ввода');
end;
end.
1) Объем видеопамяти I=k*i, где k- количество точек изображения, i- глубина цвета.
Глубина цвета i=㏒₂N, где N- количество цветов палитры.
При N=16 i=㏒₂16=4 бит
тогда объем памяти I=(800*600)*4= 1920000 бит
При N=512 i=㏒₂512= 9 бит
Количество точек изображения k=I/i= 1920000/9= 213333 точек
Отсюда размер изображения может быть например:
600х355 точек
2) Определим глубину цвета:
i= ㏒₂128= 7 бит
Тогда количество точек изображения k=I/i= (2*1024*8)/7= 2340 точек
3)Объем памяти звукового файла I=t*i*n*k, где t- время звукозаписи (c.), i - глубина кодирования звука (бит), n- частота дискретизации (Гц), k- количество каналов звукозаписи.
I=(3*60)*16*44000*2= 253440000 бит = 31680000 байт= 30937,5 Кбайт= 30,21 Мбайт
4) Из формулы предыдущей задачи:
n=I/t*i*k
Количество каналов записи в условии не указано, принимаем звук моно, k=1
Частота дискретизации n=(1,3*1024*1024*8)/(2*60)*8*1=11360 Гц= 11,36 кГц
139 в десятичной системе счисления - это 212 в восьмеричной системе счисления.(переводишь так же как и в двоичную)
Var x,y,z,f:integer;
begin
write('Введите число: ');
readln(x);
while x>0 do
begin
y:=x mod 10;
z:=x div 10;
while z>0 do
begin
if (z mod 10)=y then f:=1;
z:=z div 10;
end;
x:=x div 10;
end;
if f=1 then writeln('Верно, есть одинаковые цифры')
else writeln('Нет одинаковых цифр')
<span>end.
Если использовать строковые ф-ии, то программа будет проще:
var
i,k,f:integer;
s,t:string;
begin
write('Введите число: ');
readln(s);
k:=length(s);
for i:= 1 to k do
begin
t:=copy(s,i+1,k-i+1);
if pos(s[i],t)>=1 then f:=1;
end;
if f=1 then writeln('Верно, есть одинаковые цифры')
else writeln('Нет одинаковых цифр')
end.</span>
НЕ (число < 50), следовательно, число > 50
Число четное.
Между ними стоит "И", условия должны выполняться одновременно.
Число > 50 И число четное.
1) 24 < 50 - не подходит.
2) 45 < 50 - не подходит
3) 74 > 50, четное - подходит.
4) 99 > 50, но оно не четное.
Ответ: 3) 74