Закрась клетки между двумя линиями, робот!
1. Сила двигателя 2. Сила трения встречного воздушного потока 3.уровень горизонта 4. Коэффициент трения колес с дорожным покрытием 5. гравитация планеты.
Var j,i:longint;
begin
for i:=2 to 3628800 begin
for j:=2 to 3628800 do writeln(i*j:10);writeln();
end;
readln;
end<span>.</span>
4 + 5 + 2 + 5 + 6 = 22 и еще прибавляем пробельные символы и тире итого 22 + 1 + 3 + 1 + 1 = 27 байтов
8битов
32байта
16532бита
8кб
10мб
вродебы так,но я не уверен