用C,D,J,K,R,V中的任意三种正确解答打乱排序。
以下三段代码从上到下使用的分别是C, D, R：
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
char *token;
char a[10][30];
char d[30];
char t[30];
int n,j,k,x;
int main(int argc, char* argv[]) {
for (int i=1; i < argc; i++){
token=strtok(argv[i], " ");
strcpy(d,token);
n=0;
while (token!=NULL){
token=strtok(NULL, " ");
if (token!=NULL){
strcpy(a[n],token);
n++;
}
}
for (j=0; j < n; j++){
for (k=j+1; k < n; k++){
x=0;
while (a[j][x]==a[k][x]){
x++;
}
if (a[k][x]==NULL || (a[k][x]!=NULL && a[j][x]!=NULL && strchr(d,a[k][x])-d < strchr(d,a[j][x])-d)){
strcpy(t, a[j]);
strcpy(a[j], a[k]);
strcpy(a[k], t);
}
}
}
char s[300]="";
for (j=0; j < n; j++){
strcat(s,a[j]);
strcat(s," ");
}
puts(s);
}
return 0;
}
import std.stdio;
import std.string;
import std.algorithm;
import std.array;
void main(string[] args) {
foreach (i; 1 .. args.length) {
string token = split(args[i], " ")[0];
string[] a = split(args[i], " ")[1 .. $];
ulong n = a.length;
foreach (j; 0 .. n) {
foreach (k; j + 1 .. n) {
int x = 0;
while (x < a[j].length && x < a[k].length && a[j][x] == a[k][x] ) {
x++;
}
if (x == a[k].length || (x < a[j].length && token.indexOf(a[k][x]) < token.indexOf(a[j][x]))) {
swap(a[j], a[k]);
}
}
}
string s = "";
foreach (j; 0 .. n) {
s ~= a[j] ~ " ";
}
writeln(s);
}
}
for (s in commandArgs(TRUE)){
a<-strsplit(s," ")[[1]]
i<-2
while (i<length(a)){
j<-i+1
while (j<=length(a)) {
x<-1
while (x<=nchar(a[i]) && x<=nchar(a[j]) && substr(a[i],x,x)==substr(a[j],x,x)){
x<-x+1
}
if (x>nchar(a[j]) || (x<=nchar(a[i]) && x<=nchar(a[j]) && regexpr(substr(a[j],x,x), a[1])<regexpr(substr(a[i],x,x),a[1]))){
temp<-a[i]
a[i]<-a[j]
a[j]<-temp
}
j<-j+1
}
i<-i+1
}
cat(a[-1], "\n")
}
|
用C, C#, D, F#中的任意三种语言解答和弦命名。
以下三段代码从上到下使用的分别是C，C#和F#：
#include <stdio.h>
#include <string.h>
#define x(i,j)(i^=j^=i^=j)
int main(int u,char* w[]){
char* d[]={"A","A♯","B♭","B","C♭","C","B♯","C♯","D♭","D","D♯","E♭","E","F♭","F","E♯","F♯","G♭","G","G♯","A♭"};
int p[]={0,1,1,2,2,3,3,4,4,5,6,6,7,7,8,8,9,9,10,11,-1};
int q[]={0,0,1,1,2,2,1,2,3,3,3,4,4,5,5,4,5,6,6,6,0};
char s[]="ABCDEFG";
int v[]={0,2,3,5,7,8,10};
char* t="";
char* x="";
int a[3];
int b[3];
int i,j,k,r,z,m,n;
for(i=1;i < u;i++){
char *h=strtok(w[i]," ");
for(k=0;k < 3;k++){
for(j=0;j < 21;j++){if(strcmp(h,d[j])==0){a[k]=p[j];b[k]=q[j];}}
h=strtok(NULL," ");}
if(b[1] < b[0]&&b[1] < b[2]){x(b[0],b[1]);x(a[0],a[1]);}
if(b[2] < b[0]&&b[2] < b[1]){x(b[0],b[2]);x(a[0],a[2]);}
if(b[1]>b[0]&&b[1]>b[2]){x(b[1],b[2]);x(a[1],a[2]);}
if(b[0]>b[2]&&b[0]>b[1]){x(b[0],b[2]);x(a[0],a[2]);}
if(b[1]-b[0]==2 && b[2]-b[0]==4){r=0;m=a[1]-a[0];n=a[2]-a[1];}
else if(b[2]-b[1]==2 && 7+b[0]-b[1]==4){r=1;m=a[2]-a[1];n=12+a[0]-a[2];}
else{r=2;m=12+a[0]-a[2];n=a[1]-a[0];}
if(a[r]==v[b[r]]){t="";}else{t=a[r]>v[b[r]]?"♯":"♭";}
if(m==4){x=n==3?"":"+";}else{x=n==3?"°":"m";}
printf("%c%s%s\n",s[b[r]],t,x);
}
return 0;}
using System;
class Program
{
static void Main(string[] args)
{
string[] d = { "A", "A♯", "B♭", "B", "C♭", "C", "B♯", "C♯", "D♭", "D", "D♯", "E♭", "E", "F♭", "F", "E♯", "F♯", "G♭", "G", "G♯", "A♭" };
int[] p = { 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10, 11, -1 };
int[] q = { 0, 0, 1, 1, 2, 2, 1, 2, 3, 3, 3, 4, 4, 5, 5, 4, 5, 6, 6, 6, 0 };
char[] s = { 'A', 'B', 'C', 'D', 'E', 'F', 'G' };
int[] v = { 0, 2, 3, 5, 7, 8, 10 };
string t = "";
string x = "";
int[] a = new int[3];
int[] b = new int[3];
int i, j, k, r, z, m, n;
for (i=0; i < args.Length; i++)
{
string[] tokens = args[i].Split(' ');
for (k = 0; k < 3; k++)
{
for (j = 0; j < 21; j++)
{
if (tokens[k] == d[j])
{
a[k] = p[j];
b[k] = q[j];
}
}
}
if (b[1] < b[0] && b[1] < b[2]) {(b[0],b[1])=(b[1],b[0]);(a[0],a[1])=(a[1],a[0]); }
if (b[2] < b[0] && b[2] < b[1]) {(b[0],b[2])=(b[2],b[0]);(a[0],a[2])=(a[2],a[0]); }
if (b[1] > b[0] && b[1] > b[2]) {(b[1],b[2])=(b[2],b[1]);(a[1],a[2])=(a[2],a[1]); }
if (b[0] > b[2] && b[0] > b[1]) {(b[0],b[2])=(b[2],b[0]);(a[0],a[2])=(a[2],a[0]); }
if (b[1] - b[0] == 2 && b[2] - b[0] == 4) { r = 0; m = a[1] - a[0]; n = a[2] - a[1]; }
else if (b[2] - b[1] == 2 && 7 + b[0] - b[1] == 4) { r = 1; m = a[2] - a[1]; n = 12 + a[0] - a[2]; }
else { r = 2; m = 12 + a[0] - a[2]; n = a[1] - a[0]; }
t = a[r] == v[b[r]] ? "" : (a[r] > v[b[r]] ? "♯" : "♭");
x = m == 4 ? (n == 3 ? "" : "+") : (n == 3 ? "°" : "m");
Console.WriteLine($"{s[b[r]]}{t}{x}");
}
}
}
open System
let notes = [|"A"; "A♯"; "B♭"; "B"; "C♭"; "C"; "B♯"; "C♯"; "D♭"; "D"; "D♯"; "E♭"; "E"; "F♭"; "F"; "E♯"; "F♯"; "G♭"; "G"; "G♯"; "A♭"|]
let p = [|0; 1; 1; 2; 2; 3; 3; 4; 4; 5; 6; 6; 7; 7; 8; 8; 9; 9; 10; 11; -1|]
let q = [|0; 0; 1; 1; 2; 2; 1; 2; 3; 3; 3; 4; 4; 5; 5; 4; 5; 6; 6; 6; 0|]
let s = "ABCDEFG"
let v = [|0; 2; 3; 5; 7; 8; 10|]
let swap (arr: _[]) i j =
let temp = arr.[i]
arr.[i] <- arr.[j]
arr.[j] <- temp
[]
let main args =
let mutable t = ""
let mutable x = ""
let a = Array.zeroCreate 3
let b = Array.zeroCreate 3
for arg in args do
let h = arg.Split [|' '|]
for k in 0..2 do
for j in 0..20 do
if h.[k] = notes.[j] then
a.[k] <- p.[j]
b.[k] <- q.[j]
if b.[1] < b.[0] && b.[1] < b.[2] then
swap b 0 1
swap a 0 1
if b.[2] < b.[0] && b.[2] < b.[1] then
swap b 0 2
swap a 0 2
if b.[1] > b.[0] && b.[1] > b.[2] then
swap b 1 2
swap a 1 2
if b.[0] > b.[2] && b.[0] > b.[1] then
swap b 0 2
swap a 0 2
let mutable r = 0
let mutable m = 0
let mutable n = 0
if b.[1] - b.[0] = 2 && b.[2] - b.[0] = 4 then
r <- 0
m <- a.[1] - a.[0]
n <- a.[2] - a.[1]
elif b.[2] - b.[1] = 2 && 7 + b.[0] - b.[1] = 4 then
r <- 1
m <- a.[2] - a.[1]
n <- 12 + a.[0] - a.[2]
else
r <- 2
m <- 12 + a.[0] - a.[2]
n <- a.[1] - a.[0]
if a.[r] = v.[b.[r]] then
t <- ""
else
t <- if a.[r] > v.[b.[r]] then "♯" else "♭"
if m = 4 then
x <- if n = 3 then "" else "+"
else
x <- if n = 3 then "°" else "m"
printfn "%c%s%s" s.[b.[r]] t x
0
|
