Алгоритм то програм 2 Самостійна робота (завдання підвищеної складності) 1 ПВиконай завдання 9і 10 у грі Блоклі «Пташка»: https://blockly-games. appspot.com/bird. Ал... А.А., Л от 10 м ортолб OTOMOD0monov
// PascalABC.NET 3.2, сборка 1374 от 10.01.2017 // Внимание! Если программа не работает, обновите версию!
begin Writeln('*** Матрица А ***'); var a:=MatrRandom(4,7,-50,50); a.Println(4); Writeln('*** Матрица B ***'); var b:=MatrRandom(4,7,-50,50); b.Println(4); Writeln(4*a.ColCount*'-'); Writeln('*** Матрица А-B ***'); for var i:=0 to 3 do begin for var j:=0 to 6 do Write(a[i,j]-b[i,j]:4); Writeln end; end.
Вычислительная техника является важнейшим компонентом процесса вычислений и обработки данных. первыми приспособлениями для вычислений были, вероятно, всем известные счётные палочки, которые и сегодня используются в начальных классах многих школ для обучения счёту. развиваясь, эти приспособления становились более сложными, например, такими как финикийские глиняные фигурки, также предназначаемые для наглядного представления количества считаемых предметов. такими приспособлениями, похоже, пользовались торговцы и счетоводы того времени.
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('*** Матрица А ***');
var a:=MatrRandom(4,7,-50,50); a.Println(4);
Writeln('*** Матрица B ***');
var b:=MatrRandom(4,7,-50,50); b.Println(4);
Writeln(4*a.ColCount*'-');
Writeln('*** Матрица А-B ***');
for var i:=0 to 3 do begin
for var j:=0 to 6 do Write(a[i,j]-b[i,j]:4);
Writeln
end;
end.
Пример
*** Матрица А ***
11 -12 -37 22 3 -8 16
-2 21 31 4 -1 13 20
18 -42 -46 -17 19 8 -14
-26 -32 -2 31 -26 -43 -31
*** Матрица B ***
13 -14 12 -37 2 -12 34
26 25 -47 2 -42 1 -43
44 -6 -1 24 37 -9 -3
-30 3 -29 -39 -11 -8 -14
*** Матрица А-B ***
-2 2 -49 59 1 4 -18
-28 -4 78 2 41 12 63
-26 -36 -45 -41 -18 17 -11
4 -35 27 70 -15 -35 -17