Ask___
Advice
Главная
О сервисе
О нас
Правила пользования сайтом
Авторское право
Политика конфиденциальности
Задать вопрос
Искать
Главная
Информатика
Ответы на вопрос
Юлия Соколовская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*
Комментарий*
Согласен с
политикой конфиденциальности
Отправить вопрос
Популярные вопросы в разделе
Самостоятельная работа. Работа роздана по вариантам Написать программы:Найти площадь квадрата S=a2Даны четыре числа. Найти их сумму и произведение.
Автор: voropayelena26
Определите размер файла , в котором закодирован растровый рисунок размером 640 на 480 пикселей в режиме истинного цвет?
Автор: vis-lyubov8832
Решить карточку по информатике,
Автор: kryukovaem
Время прибывания за компьютером 6_9 класс сколько
Автор: k075ko8
Даны два одномерных целочисленных массива (A и B) размерностью N. Поместить в массив B номера положительных элементов целочисленного массива A. Массив заполнить случайными числами и добавить цикл do-w...
Автор: shangina1997507
Вниманию тех, кто знает Паскаль (АВС): 1. Задан массив Х [ 1 ... N ] . Какой оператор надо поставить вместо многоточия, чтобы найти в переменной S сумму всех элементов массива?S : = 0 ;for k : = 1 t...
Автор: magazin7452834
Придумать и записать алгоритм 3-х геометрических фигур, при системы команд исполнителя Чертежник. К алгоритмуу прикрепить его исполнение( чертеж, фото)
Автор: АлексейГагиковна1774
16. чему будет равно значение переменной y после выполнения фрагмента программы? не понятно. y: =1; i: =1; while i> 1 do begin y: =y+1/i; i: =i-1; end;
Автор: Алексеевич949
1. Что не является высказыванием: а) Лондон – большой город. б) Завтра будет понедельник. в) Коля должен участвовать в соревновании. г) закройте дверь. 2. Правильное обозначение логических переменных....
Автор: olgabylova6223
Задача в C++.Дано натуральное число N. Вычислить Р=(1-1/2^2)*(1-1/3^2)*...*(1-1/n^2), где N>1
Автор: janetp
Напишите программу, которая возводит введённое число в степень 10, используя только четыре операции умножения.ТОЛЬКО НА ПАЙТОНЕ ТОЛЬКО
Автор: moisalexx7
Составь программу, по которой выводится значение true, если точка с заданными координатами лежит внутри ограниченной графиками области, и false в противном случае. Паскаль
Автор: topshopnails
Среди приведённых ниже трёх чисел, записанных в различных системах счисления, найдите максимальное и запишите его в ответе в десятичной системе счисления. В ответе запишите только число, основание ...
Автор: Korinchan390
Запустите программный код в среде программирования. заполните данные таблицы "выходные данные d" входные данные r: 2 6 7 9 выходные данные d: 4 . . (где точки надо заполнить) буду
Автор: спец387
Из каких комплектующих состоит компьютер IBM ?
Автор: Tomilova1686
▲
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.