Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Дано натуральное число. Определить сколько раз в нём встречается цифра а. на паскале с помощью оператора цикла: while

5-9 класс

ББУДУ ОЧЕЕЕЕНЬ БЛАГОДАРНА

Nataxa781 16 апр. 2015 г., 1:23:01 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
AMIGO2512
16 апр. 2015 г., 3:29:59 (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.

 

 

Ответить

Другие вопросы из категории

1. Для долговременного хранения информации служит:

А) оперативная память. Б) процессор. В) внешняя память
2. При отключении компьютера от сети информациия:
А) исчезает из оперативной памяти
Б) исчезает из постоянного запоминающего устройства
В) стирается на магнитном диске
3. В каждой ячейке оперативной памяти может храниться двоичный код длиной...
А) 2 знака б) 8 знаков в) 4 знака
4. Энергозависимым видом памяти является:
А) flash-память б) CD-диск в) жесткий диск
5. К внутренней памяти компьютера относится:
А) флэш-память б) лазерный диск в) оперативная память

Метеорологическая станция ведёт наблюдение за температурой воздуха. Результатом каждого измерения температуры является целое число в

диапазоне от -25 до 25 включительно, записываемое при помощи минимально возможного количества бит, одинакового для каждого значения температуры. За сутки станция делает 12 измерений. Каков информационный объём суточных измерений?

Читайте также

НАПИСАТЬ ПРОГРАММЫ(ПАСКАЛЬ)

Дано натуральное число.Определить номер цифры 8 в нем,считая от конца числа ,Если такой цифры нет,ответом должно быть число 0,если таких цифр в числе несколько -должен быть определен номер самой левой из них

Дано натуральное число.определить,сколько раз в нем встречается минимальная цифра (например для числа 102200 ответ равен 3,для числа 30330-2)

Найти 10 первых натуральных чисел ,оканчивающихся на цифру 7 кратных числу 9 и находящихся в интервале ,левая граница которго равно 100

дано натуральное число N, Написать ему выводящую на экран последовательность натуральность натуральных чисел от 1 до N, задание 2 дано натуральное число

N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!

1)найти количесво делителей натурального числа,сколько из них чётных? 2) дано натуральное число: найти две первые цыфры числа

верно ли,что первая цыфраа данного числа чётная?

3)найти все трёхзначные числа,которые состоят из разных цыфр,а их сумма равна А(А вводится с клавиатуры)

4)найти все симметричные натуральные числа(палиндромаиз промежутка от А до В(А и В вводится с клавиатуры)

в Паскале 1. Среди четырёхзначных чисел выбрать те, у которых все четыре цифры различны.

2. Дано шестизначное число n. Определить сколько раз в нём повторяется минимальная цифра.

Вариант № 2 1)Подсчитать сумму квадратов всех отрицательных и четных чисел из 10 вводимых. 2) Даны натуральные числа от 35 до 87.

Найти и напечатать те из них, которые при делении на 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).



Вы находитесь на странице вопроса "Дано натуральное число. Определить сколько раз в нём встречается цифра а. на паскале с помощью оператора цикла: while", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.