Ввести
5-9 класс
|
целое число и определить, верно ли, что в нём ровно 1 цифра
«9». (Кумир)
Берешь какое-нибудь число делишь его на девять, и узнаешь сколько в числе цифр 9, например 10:9=1(1ост.)
var
x,i: integer;
s: string;
begin
write('Введите число: ');
readln(s);
for i:= 1 to length(s) do if s[i] = '9' then inc(x);
write(x);
end.
Другие вопросы из категории
напишіть програму обчислення добутків
a(a+1)(a+2)...(a+n+1)
2) Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет ее до ближайшего рубля (до 50 копеек - с недостатком, свыше 50 копеек (включая 50) - с избытком). Используйте компьютер, чтобы ввести точную сумму налога и вывести, сколько следует уплатить.
Нужно менять саму строку, а не просто символы выводить
Читайте также
Ввести x и y
Какие значения будут выведены в результате ее работы?
например армия(строка а)
арбуз (строка б)
2)составьте программу ,которая предлагает ввести с клавиатуры две строки а и б ,соеденяет их и выводит результат в одну строку
например: тепло(строка а)
ход(строка б)
2)Ввести 2 числа. Напечатать их частное или сообщить, что на 0 делить нельзя
(с защитой от неверного ввода) или Ввести натуральное число и определить, верно ли, что сумма его цифр равна 10 (с защитой от неверного ввода).