Три подруги Галина, Ольга, Валентина отправить за покупками. на вопрос кто из них купил туфли женщина ответили следующее .Валентина:я не покупала туфли, покупала Галина. Галина:я не покупала туфли и Ольга тоже. Ольга: Галина не покупала туфли, это Валентина купила .их общая подруга Марина захотела узнать правду, она знала, что одна из подруг говорит правду вторая говорит правду только наполовину ,а третья лжет. кто из женщин приобрёл обновку

Покупала Галина

Валя говорит правду

Галина наполовину правду

а Оля лжёт

ввод x = 1, y = 3

x = 3 - 1= 2

y = 2 * 2 = 4

x = 2 * 4 + 2 = 10

y = 4 + 10/2 = 9

вывод x = 10, у = 9

ответ. в результате работы программы получим: х = 10, у = 9.

var

i,j,s: integer;

x: array[1..8,1..8] of integer;

y: array[1..10,1..10] of integer;

begin

s: =0;

for i: =1 to 8 do

for j: =1 to 8 do

begin

readln(x[i,j]);

if i< =j then s: =s+x[i,j];

end;

writeln("сумма для x=", s);

s: =0;

for i: =1 to 10 do

for j: =1 to 10 do

begin

readln(y[i,j]);

if i< =j then s: =s+y[i,j];

end;

writeln("сумма для y=", s);

end.