begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -10, 99);
a.Println;
var k := n div 2;
if n.IsEven then
a := a[k:] + a[:k]
else
a := a[k + 1:] + Arr(a[k]) + a[:k];
a.Println
end.
Вода-мясо-картошка-лук-морковь-томат-капуска вот и борьщь готов)
Дана программа 21212.
Значит, для числа 12 выполняется следующая последовательность действий:
1) 12 * 2 = 24
2) 24 + b
3) (24 + b) * 2 = 48 + 2b
4) (48 + 2b) + b = 48 + 3b
5) (48 + 3b) * 2 = 96 + 6b
Так как программа перевожит число 12 в число 156, то 96 + 6b = 156
6b = 156 - 96
6b = 60 => b = 10
Ответ: b = 10
ЭВМ - компьютер, на интегральной схеме которого находится его "микропроцессор".
Буду благодарен, если вы "нажмете" "спасибо".