Я использую Corel Draw. Много лет с ней работаю - очень удобно. Кто то работает на PAGE MAKER, кто то еще на чем то. Кто к чему привык.
<span>"Не ошибается тот, кто ничего не делает, хотя это и есть его основная ошибка. " - эта фраза содержит 76 символов (включая пробелы и знаки препинания). К</span>аждый символ кодируется одним байтом, значит <span>информационный объём этой фразы 76 байт.</span>
Подставим в блок-схему вместо х число 5. В блоке условия получим выражение 5>18? Это выражение ложно, поэтому выполнение задачи будет дальше по ветке "нет". В вычислительном блоке х примет такое значение:
х=2*5+1=10+1=11
следующий блок изменяет значение х
х=2*11=22
ответ: переменная х примет значение 22
на Pascal фрагмент этого алгоритма будет выглядеть так:
F X<18 THEN BEGIN
X:=2*X+1;
X:=2*X;
END
ELSE
X:=7-5*X
END;
Функция
при реализации на базовых элементах цифровой логики ("И", "ИЛИ", "НЕ") потребует четыре элемента - два на инверсию, один на дизъюнкцию этих инверсий и один на итоговую конъюнкцию. Сделаем несложное преобразование, воспользовавшись законом де-Моргана:
Теперь достаточно трех элементов. Функциональная схема представлена во вложении.
Program n1;
Uses CRT;
Const n=5; m=7;
Var A: array[1..n,1..n] of integer;
i,j,s,k: integer;
begin
clrscr;
randomize;
For i:=1 to n do
begin
For j:=1 to n do
begin
a[i,j]:=random(100);
write(a[i,j]:4);
s:=s+a[i,j];
k:=k+1;
end;
writeln;
end;
Writeln('srednee arifmeticheskoe =',s/k:4:4);
readln
end.