Дано натуральное число…

Question

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

Answer 1

39

galameta

20 февраля 2023

var n: longint; f: boolean; begin write ('N='); readln (n); f: =false; while (n<>0) 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.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: