Не знаю, на ЯП тебе нужно или нет, но вот без:
Пример множества:
Множество грибов(разные грибы, без определенного порядка, но все это - ГРИБЫ).
10 элементов:
Элемент массива - 1
Яблоко на дереве(элемент яблони) - 2
Посевы на огороде(любой посев - элемент огорода) - 3
Буква в алфавите - элемент алфавита - 4
Любой человек из класса - элемент этого класса - 5
Волос на голове (элемент волосяного покрова головы) - 6
Любой палец на кисти(элемент множества пальцев на кисти) - 7
Месяц года(месяц - элемент множества месяцев календаря) - 8
Просто число(элемент множеств всех простых чисел) - 9
Любая сторона N-угольника(элемент множества всех сторон N-угольника) - 10.
Var a,b,c:real;
begin
writeln ('Введите стороны треугольника');
read (a,b,c);
if ((a + b) > c) and ((a + c) > b) and ((b + c) > a) then writeln ('Существует')
else writeln ('Не существует');
end.
(10012+41001216)*740=30348308720
Решение для то и иначе:
X:=256;
Y:=47;
Y:=X-3*Y=256-3*47=256-141=115;
то S:=(X^2-Y/5)*3=(256^2-115/5)*3=196539
иначе S:=(Y^3-X/2)*4=(115^3-256/2)*4=6082988