1 条题解
-
0
C++ :
#include<iostream> using namespace std; int main() { int i,a; a=0; for(i=6; i<=320; ++i) if(i%2==1&&i%3==1&&i%5==1) {a++; if(a<10) cout<<i<<" "; else cout<<i;} return 0; }
Pascal :
program bhgtf; var a:array[1..100] of integer; i,s,t,j,b:integer; begin b:=0; for i:=2 to 1000 do if b<=10 then begin if (i mod 2=1)and(i mod 3=1)and(i mod 5=1) then begin inc(b); a[b]:=i; end; end else break; for j:=1 to 9 do write(a[j],' '); writeln(a[10]); end.
- 1
信息
- ID
- 390
- 时间
- 1000ms
- 内存
- 128MiB
- 难度
- (无)
- 标签
- 递交数
- 0
- 已通过
- 0
- 上传者