Дано натуральное число. Определить сколько раз в нём встречается цифра а. на паскале с помощью оператора цикла: while
5-9 класс
|
ББУДУ ОЧЕЕЕЕНЬ БЛАГОДАРНА
Program CountA;
Uses Crt;
var a,n,x,i:integer;
begin
clrscr; // очищаем экран
write('Введите число n:');
readln(n); // ввод данных
write('Введите цифру а: ');
readln(a); // ввод данных
x:=1; i:=0; i-счётчик цифр а
while (n<>0) do // Пока n не стало равным нулю
begin
x:=n mod 10; // в x остаток от деления на 10 т.е -отдельная цифра числа
if (a=x) then i:=i+1; если есть совпадение то i увеличиваем на 1
n:=n div 10; переходим к следующему разряду числа (сотни десятки единицы)
end;
writeln('Цифра ',а,' Встречается в данном числе-', i, ' раз(а)');
readkey; // Пауза до нажатия на любую клавишу
end.
Другие вопросы из категории
А) оперативная память. Б) процессор. В) внешняя память
2. При отключении компьютера от сети информациия:
А) исчезает из оперативной памяти
Б) исчезает из постоянного запоминающего устройства
В) стирается на магнитном диске
3. В каждой ячейке оперативной памяти может храниться двоичный код длиной...
А) 2 знака б) 8 знаков в) 4 знака
4. Энергозависимым видом памяти является:
А) flash-память б) CD-диск в) жесткий диск
5. К внутренней памяти компьютера относится:
А) флэш-память б) лазерный диск в) оперативная память
диапазоне от -25 до 25 включительно, записываемое при помощи минимально возможного количества бит, одинакового для каждого значения температуры. За сутки станция делает 12 измерений. Каков информационный объём суточных измерений?
Читайте также
Дано натуральное число.Определить номер цифры 8 в нем,считая от конца числа ,Если такой цифры нет,ответом должно быть число 0,если таких цифр в числе несколько -должен быть определен номер самой левой из них
Дано натуральное число.определить,сколько раз в нем встречается минимальная цифра (например для числа 102200 ответ равен 3,для числа 30330-2)
Найти 10 первых натуральных чисел ,оканчивающихся на цифру 7 кратных числу 9 и находящихся в интервале ,левая граница которго равно 100
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
верно ли,что первая цыфраа данного числа чётная?
3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)
4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)
2. Дано шестизначное число n. Определить сколько раз в нём повторяется минимальная цифра.
Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5.
3)Дано целое число а и натуральное (целое неотрицательное) число n. Вычислить а в степени n, используя в программе лишь операцию умножения.
4)Введите последовательность из n целых чисел. Найти наибольшее из всех отрицательных чисел. Вывести его значение и порядковый номер.
5)Вычислите: 99-97+95-93+91-89+....+7-5+3-1.
6)Доказать (путем перебора возможных значений), что для любых величин А, В, С типа Boolean следующая пара логических выражений имеет одинаковые значения (эквивалентны): A OR (B AND C) и (A OR B) AND (A OR C).