IDENTIFICATION DIVISION.
program-id. kyopuro.

data division.
working-storage section.
01 a pic xxx.
01 b pic xxx.
01 c pic xxx.
01 res pic xxx.

procedure division.
main.
    accept a.
    accept b.
    accept c.
    string
        a(1 : 1)
        b(2 : 1)
        c(3 : 1)
        into res.
    display res.
    end run.