Определим общее количество байт в тексте
900*2=1800
определим, сколько килобайт информации будет
1800/1024= 1.7578125
округляем, получится
1.76
ответ 1.76 Кбайт информации
Прости, что отвечаю через 2 часа, был не дома)
var
i, j, n : integer;
flag : boolean;
begin
write('n = ');
read(n);
for i := 2 to n do begin
flag := true;
for j := 2 to i-1 do
if (i mod j = 0) then begin
flag:=false;
break;
end;
if flag = true then write(i, ' ');
end;
УккееееPaolo известно что среди них в 17 пакетиков зелёного чая сообщение о том что учить на носитель закажем стакан чёрного чая и вся твоя беда информацию сбросила с тобой может быть если ты там уже посмотрю
1.Выделение текста.
2.World Pat
3.Вродее Жирный
4.Пробел
5.War