Напишите программы! Работаем через кумир : Задача №1 -дана длина ребра куба а. Найти объем куба V и площадь его поверхности S.
Задача №2 - запросить с клавиатуры 4 числа, вычислить и вывести их средне арифметическое и среднее геометрическое этих чисел.
var a:array[1..n] of integer;
i,i1,i2,x:integer;
begin
Randomize;
a[1]:=random(10);
write(a[1],' ');
for i:=2 to n do
begin
a[i]:=a[i-1]+random(10);
write(a[i],' ');
end;
writeln;
write('x = '); readln(x);
i1:=1; i2:=n;
repeat
i:=(i1+i2) div 2;
if a[i]<x then i1:=(i1+i2) div 2+1;
if a[i]>x then i2:=(i1+i2) div 2-1;
until (a[i]=x)or(i1>i2);
if a[i]=x then
begin
writeln('Искомый(ые) номер(а) элемента(ов):');
while (i>0)and(a[i]=x) do i:=i-1;
i:=i+1;
while (i<=n)and(a[i]=x) do begin write(i,' '); i:=i+1; end;
end
else writeln('Элемент не найден');
writeln;
end.
Пример:
5 6 14 15 15 22 30 36 45 45 50 56 60 64 67 76 84 92 99 101
x = 15
Искомый(ые) номер(а) элемента(ов):
4 5
1) Представим число -135 в двоичном коде: 135 = 100001112.
2) Для отрицательного числа все цифры числа заменяются на противоположные (1 на 0, 0 на 1), а в знаковый разряд заносится единица. Двоичное 10000111 имеет обратный код 1,01111000 .
3) По таблице триад переводим число из 2 в 8 систему счилсения:
1.01111000 = 1.360
4) 1.360 в десятеричном будет равно:
1 = 8^0*1 = 1 = 1 (целая часть);
360 = 8^-1*3 + 8^-2*6 + 8^-3*0 = 0.46875
Складываем целую и дробную часть и получаем: 1.46875
Объяснение: Если вы что-то не поняли, то буду рад объяснить в лс.