В одном дворе живут: Катя, Аня, Даша, Маша, Настя, Оля, Варя. Каждая пьёт свой напиток - одна сок, другая воду, третья чай, четвёртая лимонад, пятая морс, шестая молоко, седьмая коктейль. Живут они в разных домах с номерами:42,43,44,45,46,47,48. Каждая из них содержит своё животное: кошку, или собаку, или попугайчика, или кролика, или лошадь, или петуха, или рыбок.
Каждая играет на своём музыкальном инструменте: скрипка, фортепиано, флейта, саксофон, аккордеон, балалайка, синтезатор.
У каждой своё увлечение - играть в шахматы, слушать музыку, читать, танцевать, рисовать, ездить верхом.
Кто из них решает задачи? Если известно:
1) Тот, кто играет на скрипке, живёт в доме №42.
2) Даша пьёт лимонад.
3) Третий дом № 44.
4) Тот, кто живёт в доме №46, пьёт молоко.
5) Рядом с тем, кто пьёт лимонад, живёт тот, кто пьёт морс.
6) Воду пьёт Варя.
7) Аня не пьёт сок, коктейль и воду.
8) Дом №44 находится справа от дома №43 и слева от того, кто играет на саксофоне.
9) Варя в самом последнем доме.
10) Даша держит попугайчиков.
11) Тот, кто живёт в первом, доме играет в шахматы.
12) Между тем, кто держит попугайчиков, и тем, кто держит лошадь, живёт тот, кто держит кроликов.
13) Настя живёт рядом с тем, кто играет на саксофоне.
14) Оля живёт рядом с тем, кто пьёт воду.
15) Настя живёт рядом с тем, кто играет на балалайке.
16) Варя живёт в доме №48.
17) Номера домов идут по порядку 42-48.
18) Катя живёт рядом с Аней.
19) Слева от того, кто держит, попугайчиков живёт тот, кто держит собаку и не пьёт сок и морс.
20) Оля держит петуха.
21) Тот, кто живёт в доме №46, держит лошадь.
22) Тот, кто держит рыбок, любит рисовать.
23) Тот, кто пьёт сок, держит кошку.
24) Тот, кто держит рыбок, живёт рядом с тем, кто пьёт коктейль.
25) Морс пьёт Маша.
26) Тот, кто играет на фортепиано, любит слушать музыку.
27) Рядом с тем, кто живёт в доме №43, живёт тот, кто играет на флейте.
28) Тот, кто играет в шахматы, пьёт сок.
29) Коктейль пьёт тот, кто держит петуха.
30) Тот, кто пьёт чай, играет на фортепиано.
31) Варя играет на синтезаторе.
32) Даша не умеет танцевать.
33) Маша не умеет ездить на лошади, но зато отлично танцует.
34) Настя не любит читать.
35) Даша не ездит верхом и не решает задачи.
36) Оля не ездит верхом.

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

джем16

15.03.2022 05:00

Скільки разів буде виконуватися цикл i=18; do {i=i-5;} while (i 18);...

sashkaignatoly

08.06.2022 05:47

1.почему сложные пути а также пути с препятствиями называются лабиринтами? 2.почему рассматриваются различные поиска путей из лабиринта? 3.почему в компьютерных играх часто встречаются...

Murzilka89

03.10.2021 02:35

Напишите программу в паскале 1^2+2^2+3^2+4^2+5^2+6^2+7^2+8^2+9^2+10^2+11^2...

Apsalikovat

03.10.2021 02:35

Написать программу, которая выводит содержимое файла, кроме тех слов длина которых больше 5 символов. str.length()...

СараАмилина

28.04.2021 06:42

для исполнителя составить программу рисования следующих фигур 1)прямоугольник 2)квадрат...

LianaTesten200615

07.04.2020 02:15

Зоднієї ділянки зібрали26 мішків картоплі, а з другої на 4мішки менше. скільки мішків картоплі зібрали з другої ділянки ? скільки всього мішків картоплі зібрали з двох ділянок?...

Dorefi

07.04.2020 02:15

От дома дяди федора к магазину ведут две тропинки . в письме он сделал чертёж и написал, что ходит в магазин самой короткой тропинкой . какова длина этой тропинки?...

ievlevaaleksanra

07.04.2020 02:15

1. запишите цифрами число,помещенное в тексте: а) диаметр солнца приблизительно равен одному миллиону трёмстам девяноста двум тысячам километров. б) расстояние от земли до солнца...

Анастасия2787

07.04.2020 02:15

Элемент,металлические свойства которого выражены сильнее, чем у стронция,но слабее,чем у...

dbazuashvili

07.04.2020 02:15

Мы сегодня чуть не лишились интересного урока. 1.разобрать слово - интересного - по составу ( корень,суффикс,окончание) 2.каким членом предложения является слово - интересного -...

Ответ:

Ната70

05.07.2020 17:09

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
function
Transpose(a: array[,] of integer): array[,] of integer;
//Поворот на 90гр по часовой стрелке
begin
var m := Length(a, 0);
var n := Length(a, 1);
Result := new integer[n, m];
for var i := 0 to n-1 do begin
    for var j := 0 to m-1 do
      Result[i, j] := a[m-1-j, i];
end;
end;

begin
var n := ReadInteger('Введите n:');
//Заполнение матрицы NxN сл. числами и вывод на экран
var a :=MatrixRandom(n, n);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(a[i,j]);
    println;
    end;
     println;

Println('поворот влево на 90 гр');
var b := Transpose(a);
b:=Transpose(b);
b:=Transpose(b);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
println;

Println('поворот вправо на 90гр');
b := Transpose(a);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
println;

Println('поворот на 180 гр');
b := Transpose(a);
b := Transpose(b);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
end.

0,0(0 оценок)

Ответ:

babohka1

21.08.2021 08:06

1. В "реальном мире" это решается примерно так:

// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
begin
var a:=ArrRandom(ReadInteger('n='),0,2); a.Println;
a.Sorted.Println
end.

Тестовое решение:
n= 15
1 2 0 2 2 0 2 0 2 0 0 1 0 0 2
0 0 0 0 0 0 0 1 1 2 2 2 2 2 2

2. Но, поскольку считается, что школьникам больше заняться нечем, их заставляют писать примерно в таком стиле (и время займет, и ощибок понаделают):

// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
const
nn=100;
var
i,j,n,t:integer;
a:array[1..nn] of integer;
begin
Write('n='); Read(n);
Randomize;
for i:=1 to n do begin
    a[i]:=Random(3);
    Write(a[i],' ')
    end;
Writeln;
for i:=1 to n-1 do
    for j:=1 to n-1 do
      if a[j]>a[j+1] then begin
        t:=a[j]; a[j]:=a[j+1]; a[j+1]:=t
        end;
for i:=1 to n do Write(a[i],' ');
Writeln;
end.

Тестовое решение:
n=15
0 1 1 0 2 1 0 2 1 2 1 0 0 2 0
0 0 0 0 0 0 1 1 1 1 1 2 2 2 2

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку