Вопрос задан не конкретно
512*8=4096 бит
т.к. 1 байт = 8 бит
Судя по оценке "10", что, вероятно, равна 5, мы имеем дело с пятеричной системой счисления.
Текст с числами в десятичной системе:
«Я, Михаил Кузнецов,
родился 27 августа 1952 года.
После моего рождения – 10 ребенка в семье –
маму наградили орденом «Мать-героиня».
Но я, конечно, понимаю, что это обстоятельство
не дает мне права задирать нос перед своими
старшими 9 братьями и сестрами.
Как и все дети, 7 лет начал учиться в школе.
Учусь хорошо: почти всегда получаю балл «5».
С нетерпением ожидал момента вступления в пионеры.
Наконец, это свершилось: 10 лет я стал членом
Всесоюзной пионерской организации имени В.И. Ленина»
- не использовать знаки ? / и некоторые др.
- длина имени не более 20 символов
- имя файла отражает содержимое
Program mmm;
Var a : real;
var i: integer;
s: real;
begin
s:=0;
Randomize;
For i := 1 To 30 Do
Begin
a := random*100-45;
writeln(a:6:2) ;
//выписываем сгенерированные числа, необязательно
if a>40 then
s:=s+a;
End;
writeln(s:6:2) ;
end.