var m:integer;
begin
readln(m);
if (m=1) or (m=2) or (m=12) then writeln('z') else
if (m=3) or (m=4) or (m=5) then writeln('v') else
if (m=6) or (m=7) or (m=8) then writeln('l') else
if (m=9) or (m=10)or (m=11) then writeln('o')
else writeln('err');
end.
Или
if (m=1) or (m=2) or (m=12) then writeln('z');
if (m=3) or (m=4) or (m=5) then writeln('v');
if (m=6) or (m=7) or (m=8) then writeln('l');
if (m=9) or (m=10)or (m=11) then writeln('o');
if (m<1) or (m>12) then writeln('err');
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var m:integer;
begin
readln(m);
if (m=1) or (m=2) or (m=12) then writeln('z') else
if (m=3) or (m=4) or (m=5) then writeln('v') else
if (m=6) or (m=7) or (m=8) then writeln('l') else
if (m=9) or (m=10)or (m=11) then writeln('o')
else writeln('err');
end.
Или
var m:integer;
begin
readln(m);
if (m=1) or (m=2) or (m=12) then writeln('z');
if (m=3) or (m=4) or (m=5) then writeln('v');
if (m=6) or (m=7) or (m=8) then writeln('l');
if (m=9) or (m=10)or (m=11) then writeln('o');
if (m<1) or (m>12) then writeln('err');
end.