Добавил:
Studfiles2
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Контрольное задание №16-4 / 16-4 / zadanie_4
.pas program Zadanie_4;
const
M1=[1,2];
M2=[2,1];
var
res: boolean;
begin
writeln ('„ л ¬®¦Ґбвў Њ1(1,2) Ё M2(2,1)');
res:=M1=M2;
writeln ('‘а ўҐЁҐ нвЁе ¬®¦Ґбвў а ўҐбвў®: ',res);
readln ();
end.
const
M1=[1,2];
M2=[2,1];
var
res: boolean;
begin
writeln ('„ л ¬®¦Ґбвў Њ1(1,2) Ё M2(2,1)');
res:=M1=M2;
writeln ('‘а ўҐЁҐ нвЁе ¬®¦Ґбвў а ўҐбвў®: ',res);
readln ();
end.