==== PascalABC.NET =====
begin
var (x1, y1) := ReadReal2('Координаты х и у вершины 1:');
var (x2, y2) := ReadReal2('Координаты х и у вершины 2:');
var (x3, y3) := ReadReal2('Координаты х и у вершины 3:');
Print('Площадь треугольника равна',
0.5 * ((x2 - x1) * (y3 - y1) - (x3 - x1) * (y2 - y1)))
end.
Ответ:
<h3>Набор свойств, содержащий всю необходимую информацию об исследуемых объектов и процессах, называют <u>информационной моделью. Информационные модели делятся на три вида: </u>образные,смешанные и знаковые</h3>
Объяснение:
<h2 />
К сожалению на Питоне не пишу, но вот вам код на С++
//------------------------
#include <iostream>
#include <string>
#include <fstream>
#include <iterator>
using namespace std;
int main(){
setlocale (LC_ALL, "rus")
// Запись в файл
ofstream fout("favorites.dat");
fout<< "Ваш текст";
fout.close();
// чтение файла
ifstream ifs("favorites.dat");
if(ifs.is_open())
{
string s;
s.assign((istreambuf_iterator<char>(ifs.rdbuf())), istreambuf_iterator<char>());
cout << s;
ifs.close();
}
else return 0;
return 0;
}
Задание напиши полностью, как понимать натуральные числа N и M? Может множество чисел? Они должны рандомно задаваться или они уже даны?
Что бы проверить кратность числа:
if (N % 4 == 0)
{
cout>>"год высокосный! ";
} else cout>>"год не высокосный";
В случае если у тебя есть множество чисел N и M создаешь массив и перед проверкой условия пихаешь цикл по этим массивам. А вообще напиши полностью задание.
