С клавиатуры вводится длинное число, не менее 50 цифр. Определить сумму цифр данного числа . Pascal
5-9 класс
|
я паскаль давно изучал синтаксис не помню но алгаритм подскажу
переменная х,j,m,у;
ввести х;
пока x > 1
делать у =остаток от деления х на 10;
если остаток от деления у на 2 = 1;
то j = j+1;
иначе m = m + 1;
x=округлить х/10;
конец
вывести "четных цифр" m "не четных цифр" j;
конец
Другие вопросы из категории
клавиш управления курсором и в режиме прокрутки;
Режимы вставки и замены;
На напишите, что нужно делать, чтобы прийти к этому числу. Ну и ответы все скажите
Читайте также
еньшее десяти положительное число. Второй игрок прибавляет к названному числу свое целое положительное число, также не превышающее десяти, и называет сумму. К этой сумме первый прибавляет какое-либо положительное число, не превышающее десяти, и сообщает сумму. Выигрывает тот, кто первый достигнет ста.
Как добиться победы?
1)дан массив четных чисел ,определить сумму элементов которые делятся на 5 ,стоящих на нечетных местах.
2)Дано число и массив, найти количесвто элементов , равных данному числу
с клавиатуры вводится число х. если остаток от деления х на 6 равен 2, то значение f(x)=4*x^2 если остаток от деления х на 6 равен 3, то значение f(x) = корень из х , если остаток от деления на 6 =0 то f(x) = x.
Написать программу в паскале используя операторы if и else . Нарисовать блок схему