Задача сделана на языке паскаль, при помощи
PaskalPlus<span>
Оформление сделана как для студенческой задачи
<span>Если есть вопросы пиши в личку</span></span>
1. Var a, b, c:real; d:integer;
Begin
Readln(a, b) ;
S:=a*b;
Write(s) ;
End.
2.
Var a, b, c:real; d:integer;
Begin
D:=0;
Readln(a);
If (a>0) then d:=d+1;
Readln(b) ;
If (b>0) then d:=d+1;
Readln(c>0) then d:=d+1;
Write(d);
End.
Const n=3; m=2;
var
k,d:array[1..n,1..m] of integer;
i,j:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
begin
for j:=1 to m do
begin
k[i,j]:=random(10)-3;
write(k[i,j]:4);
end;
writeln;
end;
writeln('Полученный массив:');
for i:=1 to n do
begin
for j:=1 to m do
begin
d[i,j]:=2*k[i,j];
write(d[i,j]:4);
end;
writeln;
end;
end.
Пример:
<span>Исходный массив:
-2 0
6 1
2 -2
Полученный массив:
-4 0
12 2
4 -4</span>
<span>№ 14
i=4
N=2^i=2^4=16
Ответ: 16
</span>№ 15
N=2^i
15=2^i
i=примерно 3,900бит
№ 16
без учета ковычек и точки в конце, 27Байт
1 символ=1Байт=8бит
№ 17
Возьмем число 31 т.к в 1м месяце 30-31 дней (28-29 в феврале)
2 в степени 5=32
Ответ: 5 бит
№ 18
31 дней * 12 месяцев* 24ч/c=8928≈13бит
№ 19
N=2^b
2=2^1
b=1бит
№ 20
K=15, N=256=2^8
L=k*n=15*8бит=120бит или 15 Байт
№ 21
N=2^b
Мульти - 8=2³; b=3; 200*3=600бит
Пульти - 64=2⁶; b=6; 50*6=300бит
600-300=300 бит, на столько бит сообщение племени Мульти>Пульти
№ 22
3,5КБ=28672бит
b=28672бит/14336=2бит
N=2^b
2²=4 Символа в алфавите
№ 23
1/32МБайт=32Кбайт=32*1024=32768Байт=32768*8бит=262144бит
Один символ = 262144/65536=4бит
N=2^b
b=4
N=2⁴=16
Вы вводите 2 числа,затем он выведет произведение суммы и разности этих чисел.