Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
укрытся одеялом и лечь спать, и пить лекартва и остаться дома
93₁₀ =1011101₂
93 : 2 = 46 (1)
46 : 2 = 23 (0)
23 : 2 = 11 (1)
11 : 2 = 5 (1)
5 : 2 = 2 (1)
2 : 2 = 1 (0)
1 : 2 = 0 (1)
124₁₀ =1111100₂
124 : 2 = 62 (0)
62 : 2 = 31 (0)
31 : 2 = 15 (1)
15 : 2 = 7 (1)
7 : 2 = 3 (1)
3 : 2 = 1 (1)
программа, выводящая на экран номер четверти координатной плоскости, которой принадлежит точка с координатами х≠0 и у≠0
program 198;
var x,y: real;
begin;
readln (x; y);
if x> 0 and y> 0 then
writeln (1 chetvert);
end;
if x< 0 and y> 0 then
writeln (2 chetvert);
if x< 0 and y< 0 then
writeln (3 chetvert);
if x> 0 and y< 0 then
writeln (4 chetvert);
end.
если n это количество чисел, начинаем с 3
var
i,n,p: integer
begin
readln(n);
i: =3;
p: =1;
while i< =3*n do
p: =p*i;
i: =i+3;
writeln(p);
если n это верхняя граница чисел
for i: =3 to n
if i mod 3 = 0 then
Популярные вопросы