Скачиваний:
5
Добавлен:
01.05.2014
Размер:
219 б
Скачать
program Zadanie_4;
const
M1=[1,2,3];
M2=[1,2,3,4];
var
res: boolean;
begin
writeln ('„ ­л ¬­®¦Ґбвў  Њ1(1,2,3) Ё M2(1,2,3,4)');
res:=M1<=M2;
writeln ('‘а ў­Ґ­ЁҐ нвЁе ¬­®¦Ґбвў ­  <=: ',res);
readln ();
end.

Соседние файлы в папке 13-4
  • #
    01.05.2014207 б5zadanie_4.bak
  • #
    01.05.20142.5 Кб6zadanie_4.o
  • #
    01.05.2014219 б5zadanie_4.pas