a$ = "confidencialno"
a1$ = LEFT$(a$,3)
a2$ = RIGHT$(a$,2)+"s"
a3$ = MID$(a$,4,1)+MID$(a$,7,2)
А зря, информатика полезная штука
var
a : array [1..10] of integer;
i : integer;
begin
for i := 1 to 10 do
a[i] := random (16) + 10;
for i := 1 to 10 do
writeln (a[i]);
end.
Система-множество элементов,связанных между собой
Системный подход-направление исследования, в основе которого лежит рассмотрение объекта как целостного множества элементов
Структура
Системный эффект-возникновение у системы новых свойств за счет взаимодействия составляющих систему узлов.
Монитор- графическая функция
мышь- устройство ввода
наушники- аудио устройство
процессор- устройство записи
принтер- внешнее мультимедийное устройство
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var i:=0;
range(0,10).Select(x->3**x).ForEach(t->begin writeln(i,' ',t); inc(i); end);
end.