Program proizvedenie;
var a: array[1..10] of integer;
i,p:integer;
begin
for i:=1 to 10 do a[i]:=random(11);
p:=1;
for i:=1 to 10 do p:=p*a[i];
writeln(p)
end.
14(10)=1110(2)
14|0
7 |1
3 |1
1 |1
0 |
14(10)=16(8)
14|6
1 |1
0 |
14(10)=E(16)
14| 14(Е)
0 |
1) графика, текст, числа
2) файл - <span>Специально организованная структура данных, распознаваемая компьютером как единое целое.
3) все время делим 74 на 2, пока не дойдем до того что будем делить 0 или 1 на 2, тогда в обратном порядке записываем 0 и 1. Ответ у тебя </span>74 = 10010102
4) тут даем справа налево степени от 0 до 5, после чего пишем 100101 = 2^5*1 + 2^4*0 + 2^3*0 + 2^2*1 + 2^1*0 + 2^0*1 = 32 + 0 + 0 + 4 + 0 + 1 = 37
Program z1;
var x:integer;
begin
for x:= -10 to -5 do
writeln(x,(x*x*x/4));
for x:=-6 to 0 do
writeln(x,(cos(x));
end.