membership_operators.adb.npp

来自「This contains the following topics and m」· NPP 代码 · 共 13 行

with text_io; use text_io;
procedure membership_operators is
 ch :character;

begin
if ch in 'A' .. 'Z' then
put("character is upper letter");
else
put("character is lower letter");
new_line;
end if;
   end;