Есть ответ 👍

Как определить информационный объём имени? например: иванов иван иванович. (считать, что в алфавите 64 символа).

274
393
Посмотреть ответы 2

Ответы на вопрос:


Для текста один символ=один бит. 1 байт=8 бит, 1 кбайт=1024 байт, 1 мбайт=1024 кбайт. 
Diana4441
4,8(12 оценок)

var

i, s: integer;

 

begin

 

write('нечётные числа: ');

 

for i: =1 to 9 do

if i mod 2=1 then

write(i,' ');

 

 

write(' cумма: ');

 

for i: =1 to 9 do

if i mod 2=1 then

s: =s+i;

write(s,' ');

 

write(' квадрат: ');

 

for i: =1 to 9 do

if i mod 2=1 then

begin

s: =i*i;

write(s,' ');

end;

 

write(' куб: ');

 

for i: =1 to 9 do

if i mod 2=1 then

begin

s: =i*i*i;

write(s,' ');

end;

 

end.

Популярно: Информатика