На паскале. 99 два юных шамана егор и саша отправились на всероссийский конкурс опытных шаманов профессионалов. до места проведения вкошп можно добраться только на поезде. всего в вагоне поезда восемь купе по четыре места в каждом. входные данные в единственной строке содержатся два натуральных числа — номера мест саши и егора соответственно. гарантируется, что они не будут превышать количество мест в вагоне, описанном в условии. также гарантируется, что у егора и саши билеты на разные места. выходные данные в первой строке выведите "yes", если друзья попадут в одно купе, и "no" — иначе. во второй строке выведите "low", если саша будет ехать на нижнем месте, и "high", если на верхнем. в третьей строке выведите положение места егора в том же формате
209
294
Ответы на вопрос:
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.
Vari, a, even, odd, min, max : integer; beginmin : = 30000; max : = -1; for i: = 1 to 5 do beginread(a); if (a mod 2 = 0) then even: = even + 1else begin odd: = odd + 1; if (a > max) max : = a; if (a < min) min : = a; end; end; writeln('четных ', even); writeln('нечетных', odd); if (odd = 0)then writeln('нечетных чисел нет'); else writeln('min =' min, ' max = ', max); end.что то такое, скорее всего есть синтаксические ошибки, т.к. пишу с телефона, надеюсь смысл поняли и сможете сами написать
Популярно: Информатика
-
vuuud00Sonya28.04.2020 05:24
-
Leraleralozia16.03.2023 12:45
-
Нм6шиш09.02.2023 04:33
-
Сын12ru22.11.2020 02:51
-
Артем62021.12.2022 21:55
-
DEAFKEV06.11.2020 09:25
-
lolisgd29.05.2022 12:42
-
Kotik7778914.03.2021 09:40
-
danilchirkov016.03.2020 06:01
-
Omniscient1www16.03.2020 05:55