• Найти все двузначные числа, которые делятся на n и содержат в себе цифру n
    P.S. написать программу в Паскале через цикл while

Ответы 6

  • Строку Write('N = ');ReadLn(N); на N:=random(9)+1;
  • А что вместо false
    • Автор:

      nicolas66
    • 5 лет назад
    • 0
  • Boolean - это тип данных, как integer, real и т.д.Boolean - логический тип, то есть он принимает всего два значения: истина (true) или ложь (false) .Чтоб её заменить, нужно чуть ли не всю прогу переписать...
    • Автор:

      cher
    • 5 лет назад
    • 0
  • Пожалуйста сделайте
    • Автор:

      ryder594
    • 5 лет назад
    • 0
  • Я вас прошу
  • VarA,N,C:byte;B:boolean;BeginB:=false;Write('N = ');ReadLn(N);A:=10;While A<100 doBeginif A mod N = 0 then Begin C:=A; While C<>0 do  Begin  if C mod 10 = N then B:=true;  C:=C div 10  End; if B then Write(A,' '); B:=false End;A:=A+1EndEnd.
    • Автор:

      landen242
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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