определить сколько раз в данное четырехзначное число входит цифра 1
5-9 класс
|
var iNum: integer; //Число
begin
readln(iNum);
writeln(iNum div 1, ' раз');
end.
В какое число?
неважно, программа на языке паскаль.
Другие вопросы из категории
Жыли четыре друга. У них были имена Альберт, Карл, Дитрих и Фридрих. Фамилии друзей такие же, что и имена, только так, что ни у кого из них имя и фамилия
Определите фамилию и имя каждого мальчика, если известно, что имя мальчика, у которого фамилия Фридрих, это фамилия того мальчика, имя которого -фамилия Карла.
Подпись :Пуф-Пуф
2)Одна из возможных форм курсора?
Читайте также
входной файл содержит целое четырехзначное число 1000≤
2.Дано целое число N.Написать программу ,заменяющую его нулём ,если больше или равно нулю,и увеличивающая его в 2 раза ,если число меньше нуля.
3 .Дано целые числа a и b .Написать программу , которая выводит сначала большее число ,затем меньшее.
4.Даны числа a,b,c.Написать программу ,выводящую их в возрастающем порядке.
ПЛИЗ ПОМОГИТЕ
клавиатурызадаются в таком порядке: x y и 50 чисел. Помогите, пожалуйста, очень надо)
этих двух чисел заменить половиной их суммы, а большее — их удвоенным произведением.
2)Даны вещественные числа х и у, не равные друг другу. Меньшее из этих двух чисел заменить половиной их суммы, а большее — их удвоенным произведением.