По идее множество А содержит множество B
а) пересечение.
Var
i, g: integer;
begin
for i := 50 downto 2 do
if i mod 2 = 0 then g := g + i;
writeln(g);
end.
Сборник слов в алфавитном порядке, с пояснениями, толкованиями или с переводом на другой язык<span>.<span>Совокупность всех слов какого-нибудь . языка, а также слов, употреблённых в каком-н. одном произведении или в произведениях какого-нибудь. писателя.-Значение словаря </span></span>Смотря какой словарь Ну например,если словарь английского языка для перевода слов с одного языка на другой Энциклопедия-<span> приведённое в систему обозрение всех отраслей человеческого знания или круга дисциплин, в совокупности составляющих отдельную отрасль знания.Энциклопедии делятся на универсальные , отраслевые ,<span> региональные, проблемные, персональные.</span>. </span>
var
a, b, a1, b1, cost, w, h: integer;
begin
readln(a, b, a1, b1, cost);
w := a div a1;
if a mod a1 <> 0 then inc(w);
h := b div b1;
if b mod b1 <> 0 then inc(h);
writeln(w * h);
writeln(w * h * cost);
end.