Помогите: Составьте слова из букв к,е,н,г,ш,а,п,р,о,м,и,т
irichka7575
Шар,шаг,ритм,рог,ринг,тигр,рот,ром,ген,мера,кино,мир,пот,море,ком,кит,тик,ток,шпат,морг,тир
1) 10101-1110=111₂
2) 111₂=2²*1+2*1+2⁰*1=4+2+1=7₁₀
Const e=0.001;
var a1,a2:real;n:integer;
begin
a1:=0.5;
a2:=sin(a1)/cos(a1)/2;
n:=2;
writeln(n,a2:7:4);
while abs(a2-a1)>=e do
begin
a1:=a2;
a2:=sin(a1)/cos(a1)/2;
n:=n+1;
writeln(n,a2:7:4);
end;
writeln('n = ',n);
end.
Результат:
<span>2 0.2732
3 0.1401
4 0.0705
5 0.0353
6 0.0177
7 0.0088
8 0.0044
9 0.0022
10 0.0011
11 0.0006
n = 11</span>
//Pascal ABC
//Вывод чисел кратных 3 на промежутке от 0 до 50
var
i:integer;
begin
for i:=0 to 50 do begin
writeln(i);
i:=i+2;
end;
end.
Д) 3 пер А,В,С. Порядок 3-1-2
3 столбец: 01111111, 4 ст. 01111111, 5ст 00110011
е) 3 пер, 1-3-2
А,В,С - как в д)
3 ст 00000011
4 ст 01010111
5 ст 10101000