Логотип сайта

Подготовка к ЕГЭ и ОГЭ

  • Главная
  • Информация о сайте
  • Сочинения ЕГЭ
  • Выпускное сочинение
  • Поиск по сайту

Выясните, лежат ли на одной прямой точки А(x1, y1)...

Категория: Язык программирования: Паскаль

Задание:

Выясните, лежат ли на одной прямой точки А(x1, y1), B(x2, y2), C(x3, y3)

Входные данные Результат

x1=1 y1=1

x2=6 y2=3

x3=11 y3=5

Точки лежат на одной прямой

Решение на языке Паскаль:


program z3;
var
   x1, x2, x3, y1, y2, y3, z, n:real;
Begin
     write ('Введите координаты точки А ');
     readln (x1,y1);
     write ('Введите координаты точки В ');
     readln (x2,y2);
     write ('Введите координаты точки  C ');
     readln (x3,y3);
     z:=(x3-x1)/(y3-y1);
     n:=(x3-x2)/(y3-y2);
     if (z=n) and (z=(x2-x1)/(y2-y1)) then
        writeln ('Точки лежат на одной прямой')
     else
         writeln ('Точки не лежат на одной прямой');
end.
 
Похожие материалы
  • Дан целочисленный массив из 30 элементов...
  • Дан целочисленный массив из 20 элементов...
  • Дан целочисленный массив из 30 элементов...
  • Дан целочисленный массив из 30 элементов...
  • Дан целочисленный массив..Элементы массива могут..
  • Дан целочисленный массив из 31 элемента...
  • Дан целочисленный массив из 30 элементов...
  • 1
  • 2
  • 3
  • 4
  • 5
Оценка: 3.1 из 18

💬 Чат ЕГЭ В Telegram. Вступить

Copyright Vopvet.Ru © 2025 Хостинг от uWeb