15 кбайт-15360 байт
256 кбайт-262144 байт
2500 кбайт-2560000 байт
72 кбайт-73728 байт
340 кбайт-356515840 байт
7 кбайт-7516192768 байт
50331648 байт- 48
56320 байт-0.0537109375.
90 гбайт-92160
1500•40•60-kol-vo байт
ANSI ASCII и KOI-8
дели на 1024-(Кб) и на 1024-(Мб)
Ответ: 3,43 (Мб).
931₁₀ = 1110100011₂
Очевидно, что минимальное число должно содержать минимальное количество значащих цифр. У нас есть "место", где идут три нуля подряд, следовательно, если эти три нуля сделать ведущими, в числе станет на три значащих разряда меньше. Пять циклических сдвигов дадут нам число
0001111101₂ или просто 1111101₂ = 125₁₀
Program z1;
var x:integer;
begin
for x:=100 to 999 do
if (x mod 11=0)and(x mod 3=0) then
write (x,' ');
end.
Program gt;
var n,a:integer;
s:real;
begin
readln(n);
readln(a);
case a of
1..5:
s:=n*2;
6:
s:=10.4;
7:
s:=10.8;
end;
writeln(s);
end.
<span>
n-число минут
a-день недели
если case не проходили то можно сделать if
</span>program gt;
var n,a:integer;
s:real;
begin
readln(n);
readln(a);
if(a<6)then s:=n*2;
if(a=6)then s:=10.4;
if(a=7)then s:=10.8;
writeln(s);
end.
Var a:integer;
begin
readln(a);
if a mod 2=0 then a:=a*a
else a:=a*a*a;
writeln('a = ',a);
end.
Пример:
18
<span>a = 324</span>