На паскале. 99 два юных шамана егор и саша отправились на всероссийский конкурс опытных шаманов профессионалов. до места проведения вкошп можно добраться только на поезде. всего в вагоне поезда восемь купе по четыре места в каждом. входные данные в единственной строке содержатся два натуральных числа — номера мест саши и егора соответственно. гарантируется, что они не будут превышать количество мест в вагоне, описанном в условии. также гарантируется, что у егора и саши билеты на разные места. выходные данные в первой строке выведите "yes", если друзья попадут в одно купе, и "no" — иначе. во второй строке выведите "low", если саша будет ехать на нижнем месте, и "high", если на верхнем. в третьей строке выведите положение места егора в том же формате

Ответы

Ответ дал: vihihs1987

Program egor_sasha; var num_eg, num_sash,pri,pri1: real; var mes_eg,mes_sash: real; beginwriteln('numer egora'); readln(num_eg); writeln('numer sashi'); readln(num_sash); writeln('mesto egora (verkh=1,vniz=0)'); readln(mes_eg); writeln('mesto sashi (verkh=1,vniz=0)'); readln(mes_sash); pri: =num_sash+1; pri1: =num_eg+1; if num_eg=pri then writeln('yes') else writeln('no'); if num_sash=pri1 then writeln('yes') else writeln('no'); if mes_eg=1 then writeln('egor-high')else writeln('egor-low'); if mes_sash=1 then writeln('sasha-high')else writeln('sasha-low'); end.

Спасибо

Ответ дал: Гость

var

n: integer;

begin

readln(n);

case n mod 12 of

4: writeln('год крысы');

5: writeln('год коровы');

6: writeln('год тигра');

7: writeln('год зайца');

8: writeln('год дракона');

9: writeln('год змеи');

10: writeln('год лошади');

11: writeln('год овцы');

0: writeln('год обезьяны');

1: writeln('год петуха');

2: writeln('год собаки');

3: writeln('год свиньи');

end;

end.

Ответ дал: Гость

если первый говорит правду, то он тоже брехун и, значит, не может говорить правду, значит первый брехун, второй сказал правду, так как из них он один говорит правду, а второй брехун.