64 байта = 64*8 бит=512 бит
значит каждый символ 512/128=4 бит
ответ: 16 символов
1. (15-3)/4*3=12/4*3=3*3=9
2. 20 и 2E+01 - это константы разного типа. 20 - целочисленная константа, а 2E+01 - это запись вещественной константы
в форме с плавающей точкой.
3. sin(x)
4. Trunc(29.9)+Round(6.1)=29+6=35 целочисленного типа.
5. not (4 < 8) or (3 < 1) = false or false = false
6. x:=2; 2 -> x
y:=x*x+2*x; 2*2+2*2=4+4=8 -> y
x:=x-y; 2-8=-6 -> x
y:=x+y; -6+8=2 ->y
ответ: х=-6
7. d:=Trunc(10*Frac(x));
0,25 Гбайт, это 1024Мбайта деленное на 4, т.е.256Мбайт. 256 Мбайт- это 256*1024 Кбайт=2^18 Кбайт
2^30:8:1024=2^30:2^3:2^10=2^17Кбайт
2048байт=2^11байт=2Кбайт; 2÷1024=1/512 Мбайт
5120бит=2^9×10=2^9*10/8 байт=2^6×10байт=2^6×10/2^10Кбайт=10/16 Кбайт=5/8Кбайт
program xxx;
var i, k : integer;
a : array [1..10] of real;
begin
write('введите элементы массива А:');
for i:=1 to 10 do
readln(a[i]);
writeln('исходный массив А:');
for i:=1 to 10 do
write(a[i]);
k:=0;
for i:=1 to 9 do
if a[i]<>a[10] then k:=k+1;
writeln('элементов отдичных от последнего -', k);
readln
end.
8) 1 (т.к в скобках везде идет сложение)
9) 1 (т.к в конце, не в зависимости от результата плюсуем единицу)
10) Сначала делаем конъюкцию , потом дезъюнкицю, следовательно A*0 = 0, 1+0 = 1, ответ 1