vb: "수선화 수" 란 세 자리 수 를 말 하 는데, 각 자리수의 입방 합 은 이 숫자 와 같 습 니 다. 예 를 들 어 153 = 1 ^ 3 + 5 ^ 3 + 3 ^ 3. 프로그램 을 작성 하여 출력 합 니 다. 정확 해 야 돼 요. 100 에서 1000 사이 의 모든 수선화 수 를 출력 하 다

Private Sub Command 1Click ()
For i = 100 To 1000
g = Mid (i, 1, 1)
s = Mid (i, 2, 1)
b = Mid (i, 3, 1)
If i = g * g * g + s * s + b * b Then
Print i
End If
Next i
End Sub
153.
370.
371
407
이렇게 네 개.

RELATED INFORMATIONS

1. VB 프로 그래 밍, 만약 에 세 자리 의 정수 가 여러 숫자의 큐 브 와 같다 면 이 수 를 수선 화 수 라 고 부 릅 니 다. 하나의 정 수 를 입력 하여 수선 화의 수 를 판단 합 니 다. Private Sub FormLoad () Dim x%, a%, b%, c%, y% x = Input Box ("세 자리 숫자 입력 하 세 요", "프롬프트 상자") If Len (x) = 3 Then a = Val (Mid (x, 1, 1) b = Val (Mid (x, 2, 1) c = Val (Mid (x, 3, 1) y = Val (x) If a ^ 3 + b ^ 3 + c ^ 3 = y Then Print "수선화 에 요". Else Print "수선화 수 아니에요". End If Else Print "입력 오류" End If End Sub 이상 어디 가 틀 렸 습 니까?
2. 자바 로 1000 이내 의 모든 수선 화 수 를 구하 다
3. 모든 '수선 화 수' 를 출력 하고 수선 화 수 는 세 자리 수 이 며, 여러분 의 숫자 입방 합 은 이 숫자 자체 와 같 습 니 다. 예: 153 = 1 의 입방 + 5 의 입방 + 3 의 입방
4. 피트는 어떻게 센티미터를 환산하는가?
5. 텔레비전 한 대의 스크린 크기 는 24 인치 이다.×16 인치,개 선 된 텔레비전의 스크린 길 이 는 각각 20%증가 하면 면적 은 몇%증가 합 니까?
6. 2.8 인치 화면의 길이 와 너 비 는 각각 얼마 입 니까?
7. 뚜껑 이 없 는 작은 나무 상자
8. 단항식 4xy 의 3 차 멱 은 몇 번 이 고 몇 번 입 니까?
9. 수학 과학 기수법 과 기타 문제 들 이 있다. (1)0.0003 미크론=미터(2)근사치 0.0070 에서 까지 정확 하 다.비트,두 개의 유효한 숫자 가 있 습 니 다.그것들 은 (3)노동절 이전의 한 전기 상가 가 한 지역 에 문 을 열 었 는데 만약 에 그들 이 보 낸 1000 권 중 200 장 이 당 첨 될 수 있다 면 그 중에서 1 장 을 뽑 으 면 당 첨 될 확률 은 이다.
10. 황 사 는 토지의 사막 화로 인 한 열악한 기상 현상 으로 인류의 생존 에 지대 한 해 를 끼 친다.황사 가 발생 할 때 가시거리 가 수 십 미터 내지 몇 미터 에 불과 하고 하늘 이 노 랗 고 어 두 워 지 는 상황 에서() A.파장 이 비교적 짧 은 일부 빛 만 지면 B 에 도달 할 수 있 습 니 다.파장 이 비교적 긴 일부 빛 만 지면 C 에 도달 할 수 있 습 니 다.주파수 가 비교적 높 은 일부 빛 만 지면 D 에 도달 할 수 있 습 니 다.주파수 가 비교적 낮은 일부 빛 만 지면 에 도착 할 수 있 습 니 다.
11. (x - 1) 의 x + 1 미 터 는 1 이 고 x 의 값 을 구한다.
12. 이미 알 고 있 는 14 (a 2 + b2 + c2) = (a + 2b + 3c) 2, 입증: a: b: c = 1: 2: 3.
13. 알 고 있 는 a + b = 5, a - c = 4, 구 (b + c) ^ 2 + 2b - 1 + 2c 의 값 이 급 합 니 다 ~ ~ ~ ~
14. 이미 알 고 있 는 b ^ 2 = a c, a ^ 2b ^ 2c ^ 2 / a ^ 3 + b ^ 3 + c ^ 3 * 1 / a ^ 3 + 1 / b ^ 3 + 1 / c ^ 3 의 값
15. 지수 에 관 한 연산 ~ 10 의 X 제곱 이 210 의 Y 제곱 이 3 이면 10 의 3x - 4y / 2 회 는 얼마 입 니까? 무릎 꿇 고 답 과 문제 풀이 방향 을 구하 다.
16. 지수 와 지수의 계산
17. 유리수 a 에 대하 여 b (a + b 는 0 이 아 닌) 정의 연산 "*" 은 다음 과 같다. a * b = a + 1 / b 예 를 들 어 1 * 2 = 1 + 1 / 2 = 3 / 2, - 2 * 5 = - 2 + 1 / 5 = - 9 / 5 위 열 을 본 떠 서 다음 각 식 (1) 2 * 3 을 계산 합 니 다. (2) 1 * (2 * 3) 구 하 는 과정 과 답 을 계산 합 니 다.
18. 有理数的除法计算. 1. 계산: 1 과 7 / 8 은 (- 10) × (- 3 과 1 / 3) 이것 (- 3 과 3 / 4) 2. 한 개 수 와 1 과 3 / 20 의 적 은 - 4 와 19 / 20, 이 수 를 구하 라?
19. x 가 어떤 실제 수량 인지 다음 의 두 번 째 근 식 은 의미 가 있 습 니 다 (1) 체크 x + 1 (2) 체크 3x - 2 (3) 체크 2 x + 1 분 의 3 (4) 체크 3 - 2x 분 의 1
20. 8888 + 1111 =