Const
N = 3;
Var
A:Array[1..N,1..N] of integer;
i,j:integer;
Begin
Randomize;
WriteLn('Исходный массив:');
For i:= 1 to N do
Begin
For j:= 1 to N do
Begin
A[i,j]:=random(21)-10;
Write(A[i,j]:3,' ')
End;
WriteLn
End;
WriteLn('↓↓↓↓↓↓↓↓↓↓↓↓↓');
For i:= 1 to N do
A[i,i]:=5;
For i:= 1 to N do
Begin
For j:= 1 to N do
Write(A[i,j]:3,' ');
WriteLn
End;
End.
Решение на GNU GCC:
#include <iostream>
using namespace std;
int main()
{
int a, b;
cin >>hex >>a >>oct >>b;
cout <<a <<"-" <<b <<"=" <<a-b;
return 0;
}
Результат работы:
(см. вложенное изображение)
Ответ: 96
0123456789ABCDE
................................
Реляционная база данных — база данных, основанная на реляционной модели данных.
Понятие «реляционный» основано на англ. relation («отношение», «зависимость», «связь»).
Использование реляционных баз данных было предложено доктором Коддом из компании IBM в 1970 году.
Для работы с реляционными БД применяют реляционные СУБД.