Предмет: Информатика,
автор: AmeliaPont
Дано четырехзначное число А. Определить есть ли в нем цифра М. И сколько раз она встречается?
Ответы
Автор ответа:
0
я думаю ты вопрос не правильно написала...
Автор ответа:
0
А как вам еще помочь?
Автор ответа:
0
Что такое input?
Автор ответа:
0
input - это ввод
Автор ответа:
0
Его можно заменить Райт или Рид?
Автор ответа:
0
да я же написал другое решение
Автор ответа:
0
Программа на паскале:
var a,m,k:integer;
begin
write('a = ');
readln(a);
write('m = ');
readln(m);
k:=0;
if a div 1000 = m then k:=k+1;
if a div 100 mod 10 = m then k:=k+1;
if a mod 100 div 10 = m then k:=k+1;
if a mod 10 = m then k:=k+1;
writeln('k = ',k);
end.
Пример:
a = 7537
m = 7
k = 2
var a,m,k:integer;
begin
write('a = ');
readln(a);
write('m = ');
readln(m);
k:=0;
if a div 1000 = m then k:=k+1;
if a div 100 mod 10 = m then k:=k+1;
if a mod 100 div 10 = m then k:=k+1;
if a mod 10 = m then k:=k+1;
writeln('k = ',k);
end.
Пример:
a = 7537
m = 7
k = 2
Интересные вопросы
Предмет: История,
автор: margaritashostak2008
Предмет: Русский язык,
автор: maks4830656
Предмет: Информатика,
автор: silanova1313
Предмет: Математика,
автор: Calina10101969
Предмет: Математика,
автор: francovamarija