Измерьте информационный объем сообщения “ура! закончились ” в битай и байтах

Для начала посчитаем количество символов строки ура! закончились =27 символов (пробелы тоже считаем) 1) в школе учат что информационный вес символа =8 бит 27*8=216 бит = 27 байт =0,0263671875 кбайт 2) но в стандарте unicode информационный вес одного символа 2 байта = 16 бит 27*16=432 бит = 53 байт=0,0263671875 кбайт уточните у преподавателя информационный вес символа, и выбирайте нужный вам вариант(информационный вес 8 бит - 1 вариант, 16 бит - 2 вариант)

паскаль:

 

uses crt;

var a,b: string; \ а-слово ,b-символ

i: integer; \ переменная для счета

begin

writeln ('слово и символ');

readln (a,b); \\ввод данных

 

for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а   и сравнение каждого с символом b. вывод ответа. или ответов 

readkey; \\если символы в слове повторяются

end.

 

 

qbasic:

 

input "число а=", a 

x = a 

do

  x = x ^ 2 + 1

  n = n + 1

loop until x > = 1000000

print a, x, n

 

max(n) = 7, при a = 0