М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

По трем введенным с клавиатуры сторонам необходимо выяснить: 1 вариант (пк №1) - могут ли эти стороны образовать треугольник; программа аbc паскаль зациклить эту программу, тем самым дать возможность повторять запрос, используя «желаете повторить? y/n».

👇
Ответ:
Strummer
Strummer
18.11.2020
Var a,b,c:integer; x:char;
begin
repeat 
write('a = '); readln(a); 
write('b = '); readln(b); 
write('c = '); readln(c); 
if (a+b>c)and(a+c>b)and(b+c>a)
  then writeln('Стороны могут образовать треугольник')
  else writeln('Стороны не могут образовать треугольник'); 
writeln('Желаете повторить? (Y/N)'); 
readln(x);
until x='N';
end.

Пример:
a = 3
b = 5
c = 4
Стороны могут образовать треугольник
Желаете повторить? (Y/N)
Y
a = 8
b = 1
c = 5
Стороны не могут образовать треугольник
Желаете повторить? (Y/N)
N
4,6(69 оценок)
Открыть все ответы
Ответ:
ketrinmaknamar
ketrinmaknamar
18.11.2020
Расстояние от точки до начала координат находится как длина гипотенузы прямоугольного треугольника, катетами которого являются координаты точки. Поскольку нам нужны не сами расстояния, а лишь сравнить их, то можно сравнивать квадраты, чтобы не извлекать корня.r_i^2=x_i^2+y_i^2

// PascalABC.NET 3.0, сборка 1088
var
  x1,x2,y1,y2,r1,r2:real;
begin
  Write('Введите координаты первой точки: '); Read(x1,y1);
  Write('Введите координаты второй точки: '); Read(x2,y2);
  r1:=sqr(x1)+sqr(y1); r2:=sqr(x2)+sqr(y2);
  if r1>r2 then Writeln('Ближе вторая точка')
  else
    if r1<r2 then Writeln('Ближе первая точка')
    else Writeln('Точки равноудалены')
end.

Тестовое решение:
Введите координаты первой точки: 16.3 -11.7
Введите координаты второй точки: 15.8 12
Ближе вторая точка
4,4(16 оценок)
Ответ:
mihanesterov
mihanesterov
18.11.2020

Графический редактор Скретч – инструмент для создания изображений в Скретч. Большинство скретчеров создают свои собственные спрайты, костюмы и фоны. Эти изображения могут быть использованы для различных целей. Это одна из отличительных функций Скретч от других языков, не включающих в себя встроенный графический редактор.

Графический редактор делится на векторный и растровый редакторы. Векторный графический редактор отличается от растрового там, что не имеет пикселей в изображении и векторная картинка выглядит красиво в любом размере.

4,5(51 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ