Предмет:
ИнформатикаАвтор:
reneАвтор:
peachesvar 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.
Автор:
maddyДобавить свой ответ
Предмет:
МатематикаАвтор:
harley86Ответов:
Смотреть
Предмет:
ХимияАвтор:
heavenlucasОтветов:
Смотреть
Предмет:
Окружающий мирАвтор:
allangqltОтветов:
Смотреть
Предмет:
ЛитератураАвтор:
cheesestickОтветов:
Смотреть