Ответ: 1 элемент будет иметь отрицательное значение.
Код:
var
A, B: array[0..99] of integer;
i: integer;
otr: integer;
begin
for i := 0 to 99 do
A[i] := 50 - (i + 1);
for i := 0 to 99 do
B[i] := A[i] + 49;
otr := 0;
for i := 0 to 99 do
writeln(B[i]);
if B[i] < 0 then
Inc(otr);
writeln(otr);
end.
Uses GraphAbc; begin SetWindowSize(300,200); SetPenWidth(4); SetPenColor(clRed); Line(120,40,160,120); SetPenColor(clBlue ); Line(160,120,60,160); SetPenColor(clGreen); Line(60,160,120,40); end.
1) (3072 кб + 3072 кб) / 2 кб= 3072 кб
2) (7 байт+384 байт)+(2 байт+2520 байт)=645байт
4) (1 байт*1 байт*1 байт*1 байт) / 1 байт=1 байт
Зависит от того, в какой кодировке написано письмо, сжато или нет, какой байт используется в данной компьютерной системе, в конце концов как измеряется информационный объём сообщения. Однозначного ответа тут быть не может. Можешь написать 672 и 84, положив кодировку однобайтовой, но это не решение.
Неприлично давать задания с ошибкой.
В слове ПРОГРАММИРОВАНИЕ две буквы М и должно было получиться
ИНАВОРИ<u>М</u>ГОРПРАМЕ.