ballerina言語のアンコール（1時間ほど追学習）

昨日の残り2問に再挑戦

 

必要な関数を作って

//2つの配列の共通要素を求めるプログラムを書く
//与えられた文字列の中で最も出現回数の多い文字を探すプログラムを書く

 

 

import ballerina/io;
function exist_count(int[] x, int y) returns int {
    int r=0;
    foreach int i in 0 ..< x.length(){if (x[i]==y){r=r+1;}} return r;
}
function exist_count_s(string x, string y) returns int {
    int r=0;
    foreach int i in 0 ..< x.length(){if (x[i]==y){r=r+1;}} return r;
}
function list_and(int[] l1,int[] l2)returns int[]{
    int[] r=[];
    foreach int i in 0 ..< l1.length(){
        if (exist_count(l2,l1[i])>0 && exist_count(r,l1[i])==0){r.push(l1[i]);}
    } return r;
}
function max_word(string s)returns string{
    int max=0;
    string r="";
    foreach int i in 0 ..< s.length(){
        int c=exist_count_s(s,s[i]);
        if (c>max){ max=c; r=s[i];}
    } return r;
}
public function main() {
    io:println(list_and([1,2,3,4],[2,3,4,5]));
    io:println(max_word("vvv victory"));
}