program a;
var
mas: 1..30,
ii: integer;
begin
for ii := 1 to 30
mas[ ii ] := 40 + random( 61 );
end.
Можно, т.к. они несут информацию о свойствах чего либо, например рсписание уроков о последовательности уроков; программа телевидения о последовательности телепередач; рецепт на получение лекарства не является инф.моделью. он не отражает свойств в данном случае лекарства.
<em>// PascalABC.NET 3.3, сборка 1549 от 17.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger; Writeln(n*' ',n)
end.
<u>Пример</u>
7
7
N=2^i
N - мощность алфавита, i - количество знаков в двоичном коде