Дано натуральное число N. Выяснить, входит ли цифра 7 в запись числа N2.( решение в паскале) Помогите буду очень благодарна

Ответы (1)

Дама 01.04.2025 4

var n:longint;
f:boolean;
begin
write ('N = ');
readln (n);
f:=false;
while (n0) do
begin
if (n mod 10)=7 then
begin
f:=true;
break;
end;
n:=n div 10;
end;
if f then writeln ('YES') else writeln ('NO');
end.

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

ПРЕДМЕТЫ