• нужна помощь и тут ))
    с помощью множества целых чисел от 0 до 255
    Дано целое число N – количество элементов массива. Вывести те цифры элементов массива, которые не содержатся ни в каком из чисел.

Ответы 1

  • var i,n,m: integer;    a: set of 0..9;    b: set of 0..9 =[0,1,2,3,4,5,6,7,8,9];     c: array[1..200] of integer;begin  write(' N = ');  readln(n);  Randomize;  for i:=1 to n do  begin    c[i]:=Random(255);    write(c[i],' ');  end;  writeln;  a:=[];  for i:=1 to n do   begin    m:=c[i];    while (m>0) do    begin      a:=a+[(m mod 10)];      m:=m div 10;    end;  end;  b:=b-a;  if b<>[] then  begin    write('в записи чисел массива не содержатся цифры :  ');    foreach i in b do write(i,' ');  end  else writeln('встречаются все цифры');end.    
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years