Как определить информационный объём имени? например: иванов иван иванович. (считать, что в алфавите 64 символа).
274
393
Ответы на вопрос:
Для текста один символ=один бит. 1 байт=8 бит, 1 кбайт=1024 байт, 1 мбайт=1024 кбайт.
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.
Популярно: Информатика
-
Булат22833709.04.2023 14:10
-
linanstyoxvdtf30.06.2022 15:25
-
asdf3712.05.2022 02:11
-
Andrebro914.10.2021 12:08
-
Бако77716.02.2020 09:51
-
КамиLLочка21.07.2022 02:48
-
6edn9ga27.04.2020 09:16
-
ilka2004z26.10.2020 00:06
-
Элайза200414.08.2022 14:56
-
nastyakopylova723.06.2021 21:23