16 × 82<span> = </span>1312 (всего символов)
<span>32 = 2^5 (5 бит = 1 символ) </span>
1312 × 5<span> = </span>6560 <span>бит </span>
6560 / 8<span> = </span><span>820</span> байт
Язык не указан, решение будет приведено на двух языках: наиболее популярном в школах Pascal и, на мой взгляд, незаслуженно считающемся "детским и непрофессиональным" BASIC (в примитивной его версии qBASIC). Как можно будет убедиться, в Бейсике программа получается даже короче и, я бы сказал, даже нагляднее..
<em><u>Pascal:</u></em>
var
x:integer;
begin
x:=1;
Writeln(' x y=4x-5');
while x<30 do
begin Writeln(x:2,4*x-5:6); x:=x+3 end
end.
<em><u>Результат выполнения программы:</u></em>
x y=4x-5
1 -1
4 11
7 23
10 35
13 47
16 59
19 71
22 83
25 95
28 107
<em><u>qBASIC:</u></em>
PRINT " x y=4x-5"
FOR x = 1 TO 30 STEP 3
PRINT x, 4 * x - 5
NEXT x
END
Результат выполнения программы:
x y=4x-5
1 -1
4 11
7 23
10 35
13 47
16 59
19 71
22 83
25 95
28 107
сначала 10 если кучки по 5 равны то 2 оставшиеся
Утверждение, которому всегда можно поставить в соответствие одно из двух логических значений. Логическое высказывание принято обозначать заглавными латинскими буквами.