ric.pl0

来自「1. PL/0 语言介绍 ●PL/0 程序设计语言是一个较简单的语言」· PL0 代码 · 共 13 行

PROGRAM RIC;
VAR
R:REAL;
I:INTEGER;
C:CHAR;
BEGIN
READ(R,I,C);
R:=R/13+12*1;
I:=I DIV 3+12 MOD 3;
WRITE(C);
C:='A';
WRITE(R,I,C);
END.