В ячейке С1 будет число 15
Здесь, как говорится, возможна масса разных вариантов. Один из самых простых такой:
var i,j: integer;
begin
for j:=1 to 5 do begin
for i:=1 to 8 do write('* ');
writeln;
for i:=1 to 8 do write(' *');
writeln;
end;
<span>end.
Если не подойдет - уточняйте требования к программе.</span>
2) 01 N - 10 O - 01 N - 000 A - 11 M - 001 E
Если на каждый цвет выделено по байту (и нет прозрачности), то i = 32*64*3 = 6144 байт = 6 Кбайт.
ГистограммыГрафикиКруговые диаграммыЛинейчатые диаграммыДиаграммы с областямиТочечные диаграммыБиржевые диаграммыПоверхностные диаграммыКольцевые диаграммыПузырьковые диаграммыЛепестковые диаграммы