Ask___
Advice
Главная
О сервисе
О нас
Правила пользования сайтом
Авторское право
Политика конфиденциальности
Ключ для indexNow
Скрипт от рекламы
Задать вопрос
Искать
Главная
Информатика
Ответы на вопрос
Юлия Соколовская1568
26.04.2021
?>
Жасанды интеллектінің дамуына ықпал еткен адамдар
Информатика
Ответить
Ответы
Stefanidi_Semeikina1896
26.04.2021
X1, y1 - начло отрезка
x2, y2 - конец отрезка
x0, y0 - координаты точки принадлежность которой мы будем проверять
Вывод будет True, если принадлежит, False, если не принадлежит.
Программа:
program fff;
const _Eps: Real = 1e-3;
var x0, y0, x1, y1, x2, y2 : real; tmp : boolean; begin
readln(x1, y1); readln(x2, y2); readln(x0, y0); tmp := ((x0 - x1) * (y2 - y1) - (y0 - y1) * (x2 - x1)) <= _Eps; tmp := tmp and ( ((x1 < x0) and (x0 < x2)) or ((x2 < x0) and (x0 < x1)) ); write(tmp); end.
Chitaia
26.04.2021
1.
#include <iostream>
using namespace std;
int main()
{
int a, b;
cout << "a = ", cin >> a;
cout << "b = ", cin >> b;
for (int i=a; i<=b; i++) {
cout << i << " ";
}
return 0;
}
Пример:
a = 5
b = 12
5 6 7 8 9 10 11 12
2.
#include <iostream>
using namespace std;
int main()
{
int a, b, s=0;
long long p=1;
cout << "a = ", cin >> a;
cout << "b = ", cin >> b;
for (int i=a; i<=b; i++) {
p = p*i;
s = s+i;
}
cout << "p = " << p << " s = " << s;
return 0;
}
Пример:
a = 5
b = 12
p = 19958400 s = 68
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Жасанды интеллектінің дамуына ықпал еткен адамдар
Ваше имя (никнейм)*
Email*
Комментарий*
Согласен с
политикой конфиденциальности
Отправить вопрос
Популярные вопросы в разделе
Какое расширение имеют файлы
Автор: Yevsyukov1697
Проводилась двухканальная (стерео) звукозапись с частотой дискретизации 16 кгц и 32-битным разрешением. в результате был получен файл размером 1 мбайт, сжатие данных не производилось. какая из ниже ...
Автор: okunevo2010
Внести в таблицу названия устройств компьютера: ввод и вывод для следующих устройств: текст, звук, фотографии, видео
Автор: Allahverdi_Мария475
Дан фрагмент электронной таблицы
Автор: vasilevich-F
Римские цифры легко изобразить, используя палочки или спички.ниже изображено несколько неверных равенств. как можно получить из них верные равенства, если разрешается переложить с одного места на др...
Автор: gurman171
Найти сумму квадратов всех натуральных чисел от 1 до 100. Решим эту задачу с использованием всех трех видов циклов. I. С использованием цикла "Пока". II. С использованием цикла "До". III. С использова...
Автор: Ingakazakova
7. Определите запись следующего выражения на языке Pythonх*+ (х+1)Oxx*2+ (+1)*3Оxх++2+ (7+1)**ЗOx2+(y+1)3Ox+2+(x+1) +3
Автор: balabina-Olesya
Что создал человек, наблюдая за полетом птицы и наблюдая за рыбами
Автор: qwe54344
В каких случаях лучшим выбором будет файл-серверная ИС?
Автор: Abespal
Раскодируйте слово по его представлению в памяти компьютера: 111100101110100111100110
Автор: kate281078
2. Даны переменные:[4] Определите типы данных для каждой переменной. Соедините линиями тип данных и переменную. my school 20.2 d=[1, 2, 3] False list bool str float
Автор: Moroshkina-Aristova2011
Создайте массив, содержащий 15 различных символов. отсортируйте его по убыванию. после этого определите и выведите на экран «наименьший» и «наибольший» символы.
Автор: msk27
Ежедневно молочная ферма надаивает х литров молока.найдите количество молока полученное за в дней (все необходимые значения введите с клавиатуры)
Автор: natalili32
в трехзначном числе зачеркнули последнюю цифру .Когда в оставшемся двузначном числе переставили цифры , а зачем преписали к ним слева последнюю цифру числа , то получилось 654.Найдите исходное число. ...
Автор: Иванникова736
Написать программу на Паскале, которая выведет на экран, учебное заведение, гапоу со карпинский машиностроительный техникум
Автор: Ruslan Zarekovkin
▲
x2, y2 - конец отрезка
x0, y0 - координаты точки принадлежность которой мы будем проверять
Вывод будет True, если принадлежит, False, если не принадлежит.
Программа:
program fff;
const _Eps: Real = 1e-3;
var x0, y0, x1, y1, x2, y2 : real; tmp : boolean; begin
readln(x1, y1); readln(x2, y2); readln(x0, y0); tmp := ((x0 - x1) * (y2 - y1) - (y0 - y1) * (x2 - x1)) <= _Eps; tmp := tmp and ( ((x1 < x0) and (x0 < x2)) or ((x2 < x0) and (x0 < x1)) ); write(tmp); end.