Поделитесь своими знаниями, ответьте на вопрос:
І. Як уставити об'єкт SmartArt на слайд презентації? 2. Які елементи керування використовують Для е редагування та форматування об'єктів SmartArt? Поясніть їх призначення. В. Як уставити діаграму на слайд презентації? 4. Які дії відбуваються автоматично під час уставлення діаграми на слайд? Б. Як змінити дані, що відображаються діаграмі? 6. Де розміщуються елементи керування для редагування та форматування
s1, s2: string;
i: integer;
done: boolean;
c: char;
function IsLetter(c: char): boolean;
begin
IsLetter := ((c >= 'a') and (c <= 'z')) or ((c >= 'A') and (c <= 'Z'));
end;
function UpperCase(c: char): char;
begin
if (c >= 'a') and (c <= 'z') then
UpperCase := Chr(Ord(c) - Ord('a') + Ord('A'))
else
UpperCase := c;
end;
begin
used := [];
readln(s1);
readln(s2);
for i := 1 to length(s1) do
if (IsLetter(s1[i])) then
include(used, UpperCase(s1[i]));
for i := 1 to length(s2) do
if (IsLetter(s2[i])) then
include(used, UpperCase(s2[i]));
done := False;
for c := 'A' to 'Z' do
if not (c in used) then
begin
done := True;
write(c);
end;
if not done then
write(0);
writeln;
end.