Держи . Напишите минимум 20 символов. Напишите минимум 20 символов.<span> Напишите минимум 20 символов</span>
Каждому разряду восьмеричной системы соответствуют ровно 3 разряда двоичной, например,
. Следовательно, четырехзначное восьмеричное число в двоичной системе будет лежать между числами
1 000 000 000 и 111 111 111 111 (включая). Теперь рассмотрим условие минимальности. Ясно, что первая группа двоичных разрядов должна быть одной единицей, т.к. в противном случае число не будет наименьшим. После этого должны следовать нули, т.к. из оставшихся кандидатов все числа, в которых на втором месте 0, меньше, чем те, у которых так 1. Аналогично, третье и четвертое место занимают 0. Значит, искомое число в двоичной системе выглядит так: 1 000 111 111. Соответственно, в восьмеричной системе это 1077, а в десятичной - 575.
1) Program dasf;
var a,b,i,s: integer;
begin
Writeln('Введите четырёхзначное число');
readln(a);
For i:=1 to 4 do
begin
S:=a mod 10+s;
a:=a div 10
end;
writeln('Сумма цифр четырёхзначного числа:',s);
<span>end.
2)</span>Program sgsgsdfg;
var a,b,c,a1,b1,c1: real;
begin
Writeln('Введите а');
readln(a);
Writeln('Введите b');
readln(b);
Writeln('Введите c');
readln(c);
If (a=b) or (a=c) then a1:=a*a
else a1:=a*2;
If (b=a) or (b=c) then b1:=b*b
else b1:=b*2;
If (c=a) or (c=b) then c1:=c*c
else c1:=c*2;
Writeln('Полученные числа: а=',a1,' b=',b1,' c=',c1);
<span>end.
3) </span>Program afgsdg;
var n,a,b,i: integer;
begin;
Writeln('Введите число');
readln(a);
Writeln('Введите степень');
readln(n);
b:=a;
For i:=2 to n do
a:=a*b;
Writeln('Число ',b,' в степени ',n,' равно ',a);
end.<span>
</span>
1) размер по диагонали - Не влияет, т.к. может быть маленький экран и плохая картинка или большой экран и хорошая.