<h3>PascalABC.NET 3.4.2, сборка 1826 от 07.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x: int64;
Readln(x);
Format('{0:#0 000 00 0}', x).Println
end.
Сама процедура занимает 5 строчек.
<u>// PascalABC.NET 3.3, сборка 1607 от 31.12.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
procedure MV(a:array[,] of integer; b,c:array of integer);
begin
for var i:=0 to b.Length-1 do
c[i]:=a.Row(i).Zip(b,(p,q)->p*q).Sum;
end;
begin
var a:array[,] of integer:=((2,4,0),(-2,1,3),(-1,0,1));
var b:array of integer:=(1,2,-1);
Writeln('Матрица A'); a.Println(3);
Write('Вектор B: '); b.Println;
var c:=new integer[3];
MV(a,b,c);
Write('Вектор С: '); c.Println
end.
32=
Короче ответ пять,Степень двойки это колво инфформации в битах
В) Процессы сбора, хранения, обработки, поиск и передачи информации.
Достовреная:2х2=4
Недостоверная 6 2х2=5
Ценная: Цены на нефть будут подниматься в ближайшие полгода. .
Малоценная: В номере газеты "Правда" от 3 февраял 1957 года не было ни одного рекламного объявления.
Своевременная: Начинается дождь.
<span>Несвоевременная: Вчера в Икее была распродажа</span>