Предмет: Информатика,
автор: bertain
Задание на фотографиях
Приложения:
bertain:
обязательно с максимально подробным объяснением (!!!) кода
Ответы
Автор ответа:
1
program sets;
type
mn=set of 0..9;
var
a,b,c:mn;
begin
a:=[1,2,3,4,5,6];
b:=[5,6,7,8,9,0];
writeln(a+b);
writeln(a*b);
write(a-a*b);
end.
Спасибо! Можете, пожалуйста, дописать объяснение к коду (за что отвечает каждая строка)?
program sets;
type
mn=set of 0..9;//описание множества десятичных цифр
var
a,b:mn;//объявление двух множеств
begin
a:=[1,2,3,4,5,6];//заполнение первого множества
b:=[5,6,7,8,9,0];//заполнение второго множества
writeln(a+b);//вывод результата объединения множеств
writeln(a*b);//вывод результата пересечения множеств
write(a-a*b);//вывод результата исключения из первого множества элементов, которые есть во втором множестве
end.
type
mn=set of 0..9;//описание множества десятичных цифр
var
a,b:mn;//объявление двух множеств
begin
a:=[1,2,3,4,5,6];//заполнение первого множества
b:=[5,6,7,8,9,0];//заполнение второго множества
writeln(a+b);//вывод результата объединения множеств
writeln(a*b);//вывод результата пересечения множеств
write(a-a*b);//вывод результата исключения из первого множества элементов, которые есть во втором множестве
end.
Да, понятно
Недогляд
Похожие вопросы
Предмет: Русский язык,
автор: Nikitka777
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: ket21
Предмет: Литература,
автор: N12irena
Предмет: Алгебра,
автор: shad2