1/16=0.0625 мб
0,0625*1024*1024*8=524288 бит объем сообщения.
524288/16384=32 символа содержит алфавит
Var
number: integer;
k: integer;
begin
repeat
write('number = ');
readln(number);
if number < 0 then k := k + 1;
until number = 0;
writeln('Кол-во отрицательных = ', k);
end.
Const
s='информатика';
var
s1:string;
begin
s1:=s; Delete(s1,1,2); Delete(s1,7,3);
Writeln(s1);
s1:=s; Delete(s1,1,1); Delete(s1,2,1); Delete(s1,3,3); Delete(s1,4,2);
Writeln(s1)
end.
Конечно информационной моделью авто,бумага с рисунком содержит информацию
Не умеешь ты картинки добавлять