Помогите, пожалуйста! Составить программу, которая определяет, являются ли разные точки с координатами (X1,Y1) и (X2, Y2) симметричными
5-9 класс
|
относительно осей координат или начала координат.
Программу составить двумя способами:
С использованием составных условий.
Без использование составных условий.
Проверить правильность программ для следующих значений параметров:
А) X1= -1, Y1=6, X2=1, Y2=6.
Б) X1=6, Y1=7, X2=1, Y2=6.
а на языке каком нужно написать си или паскаль ?
С использованием составных условий:
Program Type1;
Var X1, Y1, X2, Y2: Integer;
BeginWriteLn('X1 = ');
ReadLn(X1);
WriteLn('Y1 = ');
ReadLn(Y1);
WriteLn('X2 = ');
ReadLn(X2);
WriteLn('Y2 = ');
ReadLn(Y2);
If (X1 = -X2) And (Y1 = -Y2) Then
WriteLn('Точки симметричны относительно начала координат')
Else If (X1 = -X2) And (Y1 = Y2) Then
WriteLn('Точки симметричны относительно оси Y')
Else If (X1 = X2) And (Y1 = -Y2) Then
WriteLn('Точки симметричны относительно оси X')
Else
WriteLn('Точки не симметричны');
ReadLn;
End.
Без использования составных условий:
Другие вопросы из категории
Читайте также
начала координат.
прочертить путь выполнения алгоритма для следующих значений параметров:
А) X1= -1, Y1=6, X2=1, Y2=6.
Б) X1=6, Y1=7, X2=1, Y2=6
Или
составьте программу, которая определяет на сколько в строке S слов, начинающихся на главную букву больше, чем в строке T
надо решить одну из них
2. Составить программу, которая позволяет заменить все гласные символом "*"