Pascal: var n,m: longint; f: boolean; begin write ('decimal: '); readln(n); write ('number: '); readln (m); f: =true; while (n< > 0) do begin if ((n mod 10)=m) then begin f: =true; break; end; n: =n div 10; end; if f then writeln ('yes! ') else writeln ('no'); readln; end.c++: #include < iostream> using namespace std; int main(){ int n,m; bool f = false; cout < < "decimal: "; cin > > n; cout < < "number: "; cin > > m; while (n! =0) { if ((n%10)==m) { f = true; break; } n/=10; } if (f) cout < < "yes! " < < endl; else cout < < "no! " < < endl; return 0; }
thedoomsdatdcs36
02.04.2021
Вирусная программа-червь (worm-virus) - паразитическая программа, механизмом саморазмножения. программа способна размножать свои копии, но не поражать другие компьютерные программы. проникает на компьютер из сети (чаще всего как вложение в сообщениях электронной почты или через сеть интернет) и рассылает свои функциональные копии на другие компьютерные сети. скрипт-вирусы (script virus) - вирусы, написанные на языках visual basic, basic script, java script. на компьютер пользователя такие вирусы, чаще всего, проникают в виде почтовых сообщений, содержащих во вложениях файлы-сценарии. программы на языках visual basic и java script могут располагаться как в отдельных файлах, так и встраиваться в html-документ и в таком случае интерпретироваться браузером, причем не только с удаленного сервера, но и с локального диска.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Составьте программу вычисления суммы факториалов всех чётных чисел от m до n.