program raf105;
const
N = 10;
var
a,b: array[1..N] of integer;
x: boolean;
begin
for var i:=1 to N do
begin
a[i]:= random(15);
b[i]:= random(15);
end;
writeln('A: ',a);
writeln('B: ',b);
write('Вывод: ');
for var i:=1 to N do
begin
x:= False;
for var j:=1 to N do
if a[i] = b[j] then x:= True;
if not(x) then write(a[i],', ');
end;
end.
<h3>PascalABC</h3>
Раскрась и заполни таблицу преобразуй данные из одного вида в другой (графические в текстовые).
1. 3)
2. 3) номер столбца или строки от 0 до 7, 7 в двоичном 111, 3 бита т.е. поле - это номер строки + номер столбца = 3+3 = 6 бит
3. 4) в байте 8 бит, 32/8
4. 4)
5. 2)
6. 3)
7. 3)
8. 1)
9. 4)
10. 1)
11. 4)
12. 2)
13. 3)
14. 3)
15. 3)
16. 4)
17. переключения между запущенными приложениями
18. C:\DAY\GAMES\tetris.com
19. txt
20. текстовые редакторы
21. C:\MY\GAMES\lines.exe
1)64/4=16 (к.)-могло быть
2)64-16=48(г.)-могло быть
Ответ:48 г.,16 к.
1)64/2=32(г.)-могло быть
2)64-32(к.)-могло быть
Отвеет:32 к.,32 г.
1.
5|10|19|12
диск
2.
64*32*10=20480
65536=2^16
16*20480=327680/8=40960КБ
3.
1280*1024=1310720
32=2^5
1310720*5=65513600Б