известно, что высказывание «если х делится на 6, то х делится на 15» истинно. Будет ли верно высказывание для чисел 7 , 15, 18, 90 ?​

var a: array [1..8,1..5]of integer;

s,i,k: integer;

begin

  randomize;

  for i: = 1 to 8 do begin

        for k: = 1 to 5 do begin

              a[i,k]: = random(20)-10;

              write(a[i,k]: 3,' ');

              if a[i,k] mod 2 = 0 then s: =s+a[i,k];

        end;

        writeln;

  end;

  writeln('s=',s);

end.

var

a: array[1..100] of integer;

i,n: integer;

begin

readln(n);

writeln('исходный массив');

for i: =1 to n do

begin

a[i]: =random(50)-25;

write(a[i]: 4);

end;

writeln;

writeln('измененный массив');

for i: =1 to n do

begin

if a[i]=0 then a[i]: =n;

if a[i]< 0 then

if (a[i] mod 7=0) then a[i]: =abs(a[i])

else a[i]: =a[i]*(-2);

write(a[i]: 4);

end;

end.

второе.

решается методом подстановки

обозначим уменьшаемое как abc. тогда нужное нам число - это cba, где c, a, b = {0,1,2,3,4,5,6,7,8,9}

по условию, abc - cba = xyz (*), где x, y, z = {a,b,c}. заметим, что abc - cba > 0, и, следовательно, a > c, т.е. c < 9 (**)

из (*) получим уравнения для вычитаний из младшего, среднего и старшего разрядов соответственно (a):

10 + c - a = z (заняли "1" из среднего разряда) (a.1)

10 + (b - 1) - b = 9 при любом b (заняли "1" из старшего разряда)

a - 1 - c = x (a.2)

уравнение (*) приобретает вид:

abc - cba = x9z (***)

но y = 9 не может быть цифрой c, поскольку c < 9 согласно (**). следовательно, возможными комбинациями x,z будут: (x,z) = {(a,,,,b)}.

рассмотрим систему уравнений (a) для всех возможных случаев:

1: x = a или b, z = c.

(a.1): 10 + c - a = c => a = 10 - противоречие (должно быть a < 10).

2: x = c, z = a.

(a.1), (a.2): 10 + c - a = a, a - 1 - c = c => 10 + c = 2*(2c + 1), a = 2c + 1 => 8 = 3c, a = 2c + 1 => c = 8/3 - противоречие (c должно быть целым числом).

3: x = c, z = b.

(a.1), (a.2): 10 + c - a = b, a - 1 - c = c => 10 + c - (2c + 1) = b, a = 2c + 1 => 9 - c = b, a = 2c + 1 => для всех возможных c: c = {0,1,2,3,4} получим соответствующие им значения a и b. (a,b,c) = {(1,9,,8,,7,,6,,5,4)}. подстановкой в (***) получим единственно возможное решение: (a,b,c) = (9,5,4), т.е a = 9, b = 5, c = 4.

итак, нужное нам число это cba = 459, другие два - 954 и 495 соответственно.

проверка: 954 - 459 = 495.