<em>ПАСКАЛЬ</em>
var
x,y,z:real;
function ST(a,b,h:real):real;
begin
ST:=(a+b)*h/2
end;
begin
Write('Введите длины оснований и высоту трапеции: ');
Read(x,y,z);
Writeln('Площадь трапеции равна ',ST(x,y,z):0:5)
end.
<u>Пример</u>
Введите длины оснований и высоту трапеции: 10.4 7.3 8
Площадь трапеции равна 70.80000
1. Значение выражения в десятичной системе счисления: 4771
2. Переводим в пятеричную систему счисления, делим на 5 и собираем остатки в обратную сторону:
4771₁₀=123<span>041₅
Ответ: 1 цифра
</span>
a = 6 => b = 18 - 3 = 15
<em>a < b(6 < 15) - да</em>
<em>b < 2 - нет, b = 15 - 2 = 13</em>
<em>b < 2 - нет, b = 13 - 2 = 11</em>
<em>b < 2 - нет, b = 11 - 2 = 9</em>
<em>b < 2 - net, b = 9 - 2 = 7</em>
<em>b < 2 - net, b = 7 - 2 = 5</em>
<em>b < 2 - net, b = 5 - 2 = 3</em>
<em>b < 2 - net, b = 3 - 2 = 1</em>
<em>b < 2 - da, Вывод: b(1)</em>
Ответ: 2
var i,s:real;
begin
i:=3;
s:=1;
while i<=29 do begin
s:=s*i;
i:=i+0.2;
end;
writeln(s);
end.
Ответ 14831.5429688
Дано
800*600 разрешение65536 палитра16 кадров/сек15 камер слежения
Решениесутки = 86400 сек = 1382400 кадров
глубина пикселя 16 бит
800*600*16=7680000 бит 1 кадр
7680000бит=7500кбит
7500*1382400*15=155520000000кб=151875000мб=148315.429688Гб в сутках
10=148315.429688/x
10*x=148315.429688
148315.429688/10=14831.5429688 Гигабайт в сжатом виде за сутки