87

Найти все двузначные числа содержащие цифру n в паскале

27 февраля 2023

Найти все двузначные числа содержащие цифру n в паскале

категория: информатика

41

Var i, j, n: integer; m: string; begin readln (n); for i: =10 to 99 do begin m: =inttostr (i); for j: =1 to length (m) do if (m[j]=inttostr (n) then writeln (i); end; end. Вот так=)

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...