Створіть проект з відображенням еліпса в писаного в прямокутник з вершинами в точках (120, 20) та (250, 350), лінії контуру жовті пунктирні 2, заливка салатового кольору, стиль заливки -вертикальні лінії
(-) - неверное высказывание. (+) - верное. допустим, что в 1) 1(-), 2(+) ( Вася не первое, Юра второе) значит: 2) Саша не второе "2 - Юра" => Вася последнее. 3) Иван не второе "2 - Юра" => Гриша третье. 4) Гриша не первое "Гриша - 3" => Юра четвертое. Но Юра не может быть и на втором и на четвёртом месте. Вывод: 1) 1(+), 2(-) ( Вася - 1, Юра не 2). Значит: 2) Вася не последнее "Вася - 1" => Саша - 2. 3) Иван не второе "Саша - 2" => Гриша - 3. 4) Гриша не первое "Гриша - 3" => Юра - 4. 5) Юра четвёртое => Иван не второе. ответ: Вася -1, Саша - 2, Гриша - 3, Юра - 4, Иван - 5
1) var x:integer; begin read (x); if (x=12) or (x=1) or (x=2) then writeln ('Зима'); if (x=3) or (x=4) or (x=5) then writeln ('Весна'); if (x=6) or (x=7) or (x=8) then writeln ('Лето'); if (x=9) or (x=10) or (x=11) then writeln ('Осень'); end. 2) var K,a:integer; begin readln(K); a:=K mod 10; if (K=11) or(K=12) or (K=13) or (K=14) then writeln ('У меня ',K,' друзей') else begin if (a=1) then writeln ('У меня ',K,' друг'); if (a=0) or ((a>=5) and (a<=9)) then writeln ('У меня ',K,' друзей'); if (a>=2) and (a<=4) then writeln ('У меня ',K,' друга'); end; end.
допустим, что в 1) 1(-), 2(+) ( Вася не первое, Юра второе)
значит:
2) Саша не второе "2 - Юра" => Вася последнее.
3) Иван не второе "2 - Юра" => Гриша третье.
4) Гриша не первое "Гриша - 3" => Юра четвертое.
Но Юра не может быть и на втором и на четвёртом месте.
Вывод: 1) 1(+), 2(-) ( Вася - 1, Юра не 2).
Значит:
2) Вася не последнее "Вася - 1" => Саша - 2.
3) Иван не второе "Саша - 2" => Гриша - 3.
4) Гриша не первое "Гриша - 3" => Юра - 4.
5) Юра четвёртое => Иван не второе.
ответ: Вася -1, Саша - 2, Гриша - 3, Юра - 4, Иван - 5