ОС это не информационная, а только операционная система. Она только позволяет использовать программы, которые будут информационной системой, но сама по себе голая ОС ничего такого не делает
Ответ:
а) 12211
б) 22211
Объяснение:
чтобы легче найти ответ на такие типы, нужно начинать с конца, то есть для варианта а) с 16, самая "сильная" операция здесь умножение на 3, чтобы получить 1, нужно как можно чаще делать это действие, и так как мы начинаем с конца, мы заменяем действия на обратные, то есть на деление и сложение соответственно, 16 не делится на 3, значит прибавляем 1 до тех пор, пока число не станет на него делится
такое число 18 делим его на 3 получаем 6, видим, что опять можно применить самую "сильную операцию", делим 3 получаем 2
ну и тут, не трудно догадаться, что надо прибавить один:)
и так как мы делали операции с конца
в ответ тоже надо записывать эти операции с конца
12211
аналогично действуем со 2
Х - только паскаль,
y - паскаль+бейсик,
z - только бейсик.
x+y+z = 35,
x+y=25,
y+z=22.
И решаем эту системку.
Вычтем из первого третье
x=35-22=13
И это ответ :)
Только на паскале программируют 13 человек.
матрица заполняется случайно
программа на pascalabc
Var
max,min,mina,minb,maxa,maxb,a,b,c: integer;
mas: array[1..3,1..3] Of integer;
Begin
writeln('до :');
For a:=1 To 3 Do
For b:=1 To 3 Do
Begin
mas[a,b] := random(100);
If mas[a,b]>max Then
Begin
max := mas[a,b];
maxa := a;
maxb := b;
End;
If (min=0)Or(mas[a,b]<min) Then
Begin
min := mas[a,b];
mina := a;
minb := b;
End;
write(mas[a,b],' ');
End;
c := mas[maxa,maxb];
mas[maxa,maxb] := mas[mina,minb];
mas[mina,minb] := c;
writeln;
writeln('после :');
For a:=1 To 3 Do
For b:=1 To 3 Do
write(mas[a,b],' ');