Нехай змінна х має значення О, а у - значення 2. Визначити, які значення мають
такі прості логічні вирази:
а) х 5;
6) 5>7:
в) у = 2;
г) x+y= 2 * Х;
д) х<> у.​

№146 Для начала нужно обьявить переменные,у меня обьявляются оператором DIM,ну думаю,что дим нужен и при этом действие.

Если переменная обозначает любой знак,не имея какого либо обозначения,или указания на конкретное число,тогда это переменная равна 0,обьявим ее.

DIM A,B,C,

(Если значение переменной равно 0,то можно распаложить ее в любом положении,или в задоном(изначально))

Дальше выводим переменные на экран,

(если данная функция не работает,то,тогда нужно ввести после('),знак(,).

PRINT 'A'

PRINT 'B'

PRINT 'C'

Ну и в конце пишем:

Endif

Примечание:

Если значение переменных будет равна 0,то на экране тоже будет равна 0.

 

 

Const
  m = 8;
  n = 7;

var
  a: array[1..m, 1..n] of integer;
  i, j: integer;

begin
  writeln('Введите через пробел ', m, ' чисел');
  for i := 1 to m do
  begin
    Read(a[i, 1]);
    for j := 2 to n do a[i, j] := a[i, 1]
  end;
  Writeln('Сформированный массив');
  for i := 1 to m do
  begin
    for j := 1 to n do Write(a[i, j]:5);
    Writeln
  end
end.

Тестовое решение:

Введите через пробел 8 чисел
4 -6 10 93 345 -32 0 11
Сформированный массив
    4    4    4    4    4    4    4
   -6   -6   -6   -6   -6   -6   -6
   10   10   10   10   10   10   10
   93   93   93   93   93   93   93
  345  345  345  345  345  345  345
  -32  -32  -32  -32  -32  -32  -32
    0    0    0    0    0    0    0
   11   11   11   11   11   11   11