512=2^9 1000=2^3 *125 512000=2^12 *125 6=2*3
Размер файла = (2^12 * 125 * 2 * 3 ) бит =(2^10 * 375) байт =375 Кбайт
Ответ 375 Кбайт
На сколько информация доступна пользователю и на сколько она ему понятна
<h3>PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := SeqRandomReal(ReadInteger('n='), -99, 99)
.Select(t -> Round(t, 2)).ToArray;
a.Println;
a.Where((v, i)-> i.IsEven).Aggregate(1.0, (p, q)-> p * q).Println;
a.Sort;
a.Println
end.
Uses crt;
var a,h:longint;
b:integer;
begin
clrscr;
writeln ('Введи число');
readln (a);
h:=1;
while a>0 do
begin
b:=a mod 10;
h:=h*100+b;
a:=a div 10;
end;
a:=0;
while h>10 do
begin
b:=h mod 10;
a:=a*10+b;
h:=h div 10;
end;
writeln (a);
readln;
end.
Просто впиши ссылку на существующий сайт, через несколько минут они сами выделяться и будет возможность перейти на ссылку, но не уверена, что именно в блокноте это работает. Попробуй другой текстовой редактор, если не получится.