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