такая
естественная
красота
самая
теплая
<em>:DD что есть, то есть</em>
i=7
I=800*7
I=5600 бит
5600/8=700 байт
Ответ: 700
Const current_year = 2017;
var year: integer;
begin
readLn(year);
if year < 2017 then
Write(year, ' прошлое')
else if year = 2017 then
Write(year, ' настоящее')
else if year > 2017 then
Write(year, ' будущее')
end.