РЕШИТЕ ЗАДАЧУ!
Считая, что каждый символ кодируется одним байтом, определи, чему равен информационный объём следующего предложения (знаки препинания и пробелы – это тоже символы, тире выделяется с обеих сторон пробелами). ответ переведите в биты (В ОТВЕТ НАПИШИТЕ ТОЛЬКО ЧИСЛО)
Язык программирования — формальный язык, предназначенный для записи компьютерных программ. Язык программирования определяет набор лексических, синтаксических и семантических правил, определяющих внешний вид программы и действия, которые выполнит исполнитель (обычно — ЭВМ) под её управлением.
Языки программирования делятся на два класса - МАШИННО-ЗАВИСИМЫЕ и МАШИННО-НЕЗАВИСИМЫЕ. Под машинно-зависимыми языками понимают языки, алфавит, синтаксис и семантика которых зависят от системы команд процессора конкретно используемой ЭВМ. Машинно-независимые языки - языки свободные от такой зависимости.
Транслятор — программа или техническое средство, выполняющее трансляцию программы. Трансляция программы — преобразование программы, представленной на одном из языков программирования, в программу на другом языке.
интерпретатор - вид транслятора, осуществляющего пооператорную (покомандную) обработку и выполнение исходной программы или запроса (в отличие от компилятора, транслирующего всю программу без её выполнения).
основные задачи любой транслятор выполняет следующие основные задачи: анализирует транслируемую программу, в частности определяет содержит ли она синтаксические ошибки, и генерирует выходную программу на языке машинных команд и распределяет память для объектной программы.
Информация взята с интернета (отправил ответ что-бы вы не искали по отдельности)
Код программы:
var i, sum, a:integer;
begin
writeln('Четные числа:');
for i:= 72 to 134 do begin
if i mod 2 = 0 then
write(i, ' ');
end;
writeln();
writeln();
writeln('Числа, оканчивающиеся на "3":');
for i:= 72 to 134 do begin
if i mod 10 = 3 then
write(i, ' ');
end;
writeln();
writeln();
writeln('Числа, сумма цифр которых меньше 11:');
for i:= 72 to 134 do begin
a:= i;
sum:= 0;
while a <> 0 do begin
sum := sum + a mod 10;
a := a div 10;
end;
if sum < 11 then
write(i, ' ');
end;
end.