Информатика 10-11. Книга 2. Практика алгоритмизации и программирования. Шауцукова Л.З. - 14 стр.

UptoLike

Составители: 

end; WriteLn
end;
ReadLn
END.
Результаты работы Pascal-программы:
Введите количество тестов : 7
Тест 1. Введите a1, b1, c1 : 0 0 1 <Enter>
Введите a2, b2, c2 : 1 2 2 <Enter>
О т в е т : это не прямая (прямые).
Тест 2. Введите a1, b1, c1 : 1 2 2
<Enter>
Введите a2, b2, c2 : 0 0 1 <Enter>
О т в е т : это не прямая (прямые).
Тест 3. Введите a1, b1, c1 : 0 0 0
<Enter>
Введите a2, b2, c2 : 1 2 1 <Enter>
О т в е т : это не прямая (прямые).
Тест 4. Введите a1, b1, c1 : 1 2 1
<Enter>
Введите a2, b2, c2 : 1 2 1 <Enter>
О т в е т : прямые совпадают.
Тест 5. Введите a1, b1, c1 : 1 2 1
<Enter>
Введите a2, b2, c2 : 2 4 2 <Enter>
О т в е т : прямые совпадают.
Тест 6. Введите a1, b1, c1 : 2 3 -1 <Enter>
Введите a2, b2, c2 : 4 6 1 <Enter>
О т в е т : прямые параллельны.
Тест 7. Введите a1, b1, c1 : 1 2 -4 <Enter>
Введите a2, b2, c2 : 1 -2 1 <Enter>
О т в е т : координаты точки пересечения : x =
1.50, y = 1.25
Задачи для самостоятельного решения
1.1. Вычислите длину окружности, площадь круга и объём шара одного и того же
заданного радиуса.
1.2. Вычислите периметр и площадь прямоугольного треугольника по длинам двух его
катетов.
1.3. По координатам трёх вершин некоторого треугольника найдите его площадь и
периметр.
                    end; WriteLn
    end;
   ReadLn
END.
                      Результаты работы Pascal-программы:
            Введите количество тестов : 7
            Тест 1. Введите a1, b1, c1 : 0 0 1 
            Введите a2, b2, c2 : 1 2 2 
            О т в е т : это не прямая (прямые).

            Тест 2. Введите a1, b1, c1 : 1 2 2
            
              Введите a2, b2, c2 : 0 0 1     
            О т в е т : это не прямая (прямые).

            Тест 3. Введите a1, b1, c1 : 0 0 0
            
              Введите a2, b2, c2 : 1 2 1     
            О т в е т : это не прямая (прямые).

            Тест 4. Введите a1, b1, c1 : 1           2   1
            
              Введите a2, b2, c2 : 1 2 1              
            О т в е т : прямые совпадают.

            Тест 5. Введите a1, b1, c1 : 1           2   1
            
              Введите a2, b2, c2 : 2 4 2              
            О т в е т : прямые совпадают.

            Тест 6. Введите a1, b1, c1 : 2 3 -1 
              Введите a2, b2, c2 : 4 6 1 
            О т в е т : прямые параллельны.

            Тест 7. Введите a1, b1, c1 : 1 2 -4 
              Введите a2, b2, c2 : 1 -2 1 
            О т в е т : координаты точки пересечения : x =
            1.50, y = 1.25


                       Задачи для самостоятельного решения

1.1. Вычислите длину окружности, площадь круга и объём шара одного и того же
заданного радиуса.

1.2. Вычислите периметр и площадь прямоугольного треугольника по длинам двух его
катетов.

1.3. По координатам трёх вершин некоторого треугольника найдите его площадь и
периметр.