1.Клацніть клітинку, щоб вибрати її. Або скористайтеся клавіатурою, щоб перейти до неї й вибрати її.
Щоб вибрати діапазон, виділіть клітинку, а потім натисніть ліву кнопку миші, перетягніть вказівник миші на інші клітинки.
Або виберіть діапазон, натиснувши Shift + клавіша зі стрілкою
Щоб вибрати несуміжні клітинки й діапазони клітинок, виберіть потрібні клітинки, утримуючи натиснутою клавішу Ctrl.
2.Виберіть клітинку або діапазон клітинок.
Натисніть кнопку Копіювати або клавіші Ctrl+C.
Натисніть кнопку Вставити або клавіші Ctrl+V.
Объяснение:
давно здавал тоже
var
a,i:integer;
b:array [0..9] of boolean;
begin
Readln(a);
for i:=0 to 9 do b[i]:=false;
While a>0 do
begin
if b[a mod 10]=false then b[a mod 10]:=true;
a:=a div 10;
end;
for i:=0 to 9 do if not b[i] then Writeln(i);
end.