Невозможно знать, не имея перед собой само сообщение.
Для записи на диске нужно будет log2(8) * 56 = 168 битов.
<u>Таблица приоритетов операций</u>
<span><span><span>1) @, not, ^, +,
- (унарные), new</span></span>
<span><span>2) *, /, div,
mod, and, shl,
shr, as, is</span>
</span><span><span>3) +, - (бинарные), or,
xor
</span></span><span><span>4) =, <>, <, >,
<=, >=, in,
=>
1) * + = or - нарушение, четвертая группа впереди третьей
2) </span></span></span><span>not div or - <u><em>верно</em></u>
3) </span><span>and + div - нарушение, вторая группа после третьей
4) </span><span>xor = * - нарушение, вторая группа после четвертой
5) </span><span><span>> * - нарушение - вторая группа после четвертой</span></span>
Program _5;
var a,b,x,y:real;
F,s:real;
begin
writeln ('Введите a,b,x,y через пробел: ');
readln (a,b,x,y);
F:=(pi-sqrt(a*sqr(b)/(x-cos(a+b))))-3;
s:=(x+y-cos(12-sqr(y)))/(pi+sin(1001+sqr(a)))+sqrt(sqr(x));
writeln('F= ',F);
writeln('s=',s);
end.
Всё что ручкой, это простой разветвляющийся алгоритм.
Всё то, что добавленно карандашом для циклического. Ветка нет, перечёркнутая карандашом для циклического алгоритма не нужна, а для разветвляющегося нужна.