Устройство объекта - эскиза,
Размер объекта - чертежа,
Цвет объекта - рисунок,
Элементный состав объекта - диограммы Эйлера-Венна,
Отношения между объектами - схемы,
Стоймость объекта - числа,
Форму реального объекта - фотографии.
3)
var
i: integer;
s: string;
begin
readln(s);
i := 1;
while (s[i] <> ':') do
begin
write(s[i]);
i := i + 1;
end;
end.
4)
var
i: integer;
s: string;
begin
readln(s);
i := 1;
while i < s.Length do
begin
if(s[i] = ' ') then s[i] := '.';
if(s.Length - i > 2) then if(s[i] = '.') and (s[i + 1] = '.') and (s[i + 2] = '.') then begin
delete(s, i + 1, 2);
end;
if(s.Length - i > 2) and (i > 2) then if(s[i - 1] = '.') and (s[i] = '.') and (s[i + 1] = '.') then
begin
delete(s, i + 1, 2);
end;
i := i + 1;
end;
writeln(s);
end.
350 символов это 9бит на символ.Далее нпсложное умножение.
9*60*32*6= 129600бит =15200 байт
65536 символов это 2^16, значит 16 бит на символ, 16 бит это 8*2 = 2 байта
Всего символов в тексте 16 стр * 30 строк * 32 символа = 15360
Значит в байтах текст занимает 2*15360 = 30720 байт = 30 кбайт