Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 12.12.2012
Сообщений: 11
1

Найти сумму цифр целого числа, больших 5

12.12.2012, 09:15. Просмотров 1255. Ответов 2
Метки нет (Все метки)

Найти сумму цифр целого числа, больших 5.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.12.2012, 09:15
Ответы с готовыми решениями:

найдите сумму цифр целого числа больших 4 в Форме ?
Private sub commandbutton1_click() dim m as long dim n as long dim p as long dim s as long dim...

Описать функцию Digil Count (k) целого типа, находящую количество цифр целого положительного числа k
Описать функцию Digil Count (k) целого типа, находящую количество цифр целого положительного числа...

В заданном одномерном массиве целого типа найти и напечатать сумму цифр всех элементов массива
В заданном одномерном массиве целого типа найти и напечатать сумму цифр всех элементов массива....

Найти сумму цифр целого числа, больших 5
найти сумму цифр целого числа, больших 5.

2
133 / 60 / 24
Регистрация: 08.11.2012
Сообщений: 250
12.12.2012, 12:00 2
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
CLS
DIM n AS DOUBLE 
INPUT n
x$=STR$(n)
x$=LTRIM$(x$)
l=LEN(x$)
fo i=1 TO l
m$=MID$(x$,i,1)
z=VAL(m$)
IF z> 5 THEN s=s+z
NEXT i
?"Summa chisel bolshih 5 = ";s
END
0
Заблокирован
12.12.2012, 13:21 3
Лучший ответ Сообщение было отмечено malabar как решение

Решение

QBasic/QuickBASIC
1
2
3
4
5
6
INPUT "N = ", n&
WHILE n& > 0
    IF n& MOD 10 > 5 THEN s = s + n& MOD 10
    n& = n& \ 10
WEND
PRINT s
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.12.2012, 13:21

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Найти сумму цифр целого числа, больших 5
Найти сумму цифр целого числа, больших 5. Это нужно сделать в Windows Form.

Найти количество цифр целого числа, больших А
1.Найти количество цифр целого числа, больших А (использовать процедуру) 2.Вычислить, используя...

Найти количество цифр целого числа, больших А
Найти количество цифр целого числа, больших А (использовать процедуру)

Найти количество и сумму цифр числа, и сумму цифр больших, чем 6
С клавиатуры вводится натуральное число Х (n-разрядное, 1<=n<=10). подсчитать количество цифр и...

Найти сумму цифр целого числа
Найти сумму чисел целого числа(без учета знака) ... как можно быстрей плиз

Найти сумму цифр целого числа
дано целое число нати сумму его цифр


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.