Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Означает, что это абсолютная ссылка.
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)
program xxx;
var i, n : integer
d : array[1..30] of real;
begin
write ('введите разметность массива n=');
readln(n);
writeln(''введите элементы массива d: ');
for i: =1 to n do
readln(d[i]);
writeln ('исходный массив d: ');
write(d[i]);
if d[i] mod 3 = 0 then d[i]: = 2 * d[i];
writeln ('полученный массив d: ');
readln
end.
Популярные вопросы