1)
a нет
b нет
c нет
2)
1<span>строковый тип</span>
<span>2<span>целый тип (INTEGER) </span></span>
<span><span>3<span>вещественный тип</span></span></span>
<span><span><span>3)</span></span></span>
<span><span><span>1- 30 -46</span></span></span>
<span><span><span>2- 30 -46 -0.126 15.003</span></span></span>
<span><span><span>3- 'g'</span></span></span>
<span><span><span>4- <span>‘солнце’ '55' 'g'</span></span></span></span>
<span><span><span>5- 30 -46</span></span></span>
Var
a: array [1..4] of real;
begin
readln(a[1], a[2], a[3]);
a[4] := (a[1] + a[2] + a[3]) / 2;
writeln(sqrt(a[4] * (a[4] - a[1]) * (a[4] - a[2]) * (a[4] - a[3])));
<span>end.</span>
16 бит * 24000 Гц * 4 канала * 1 сек = 1536000 бит
1536000 бит / 8 = 192000 байт
192000 байт / 1024 = 187,5 кбайт.
187.5 кбайт / 1024 = 0,18310546875 мбайт
48 мбайт / 0,18310546875 мбайт = 262,144 секунд
из этих и выбери
Var a,b,c,p:integer;
begin
writeln('a, b, p:');
readln(a,b,p);
c:=p-(2*a+b);
writeln('c = ',c);
end.
Пример:
a, b, p:
4 10 25
c = 7
Всего: три.
1. Детективы 21 ...................................250 Есть
2. Кулинария 23 ...................................280 Есть
3. <span>Детская литература 43........................... 230 Есть</span>