Много баллов дам за решение..
5-9 класс
|
Треугольник задан координатами вершин, вычеслить периметр, площадь.вычеслить длин сторон, оформить с помощью процедур
задачу на Паскале
пожалуйста срочно надо
program gt;
var x1,y1,x2,y2,x3,y3,a,b,c,p,s:real;
procedure dlinastoron(x1,y1,x2,y2:real;var b:real);
begin
b:=sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
end;
procedure perimetr(a,b,c:real;var d:real);
begin
d:=a+b+c;
end;
procedure ploshad(a,b,c:real;var d:real);
var s:real;begins:=(a+b+c)/2;
d:=sqrt(s*(s-a)*(s-b)*(s-c));
end;
begin
readln(x1,y1,x2,y2,x3,y3);
dlinastoron(x1,y1,x2,y2,a);
dlinastoron(x1,y1,x3,y3,b);
dlinastoron(x3,y3,x2,y2,c);
perimetr(a,b,c,p);
ploshad(a,b,c,s);
writeln(a,' ',b,' ',c);
writeln(p);
writeln(s);
end.
Другие вопросы из категории
а) принимающий конечное число определённых значений
б) непрерывно изменяющийся во времени
в) который можно декодировать
г) несущий какую-либо информацию
графическом редакторе является:
потребуется для хранения такого изображения?
Скорость работы домашнего интернета составляет 2 мега байта в секунду.Расчитать, сколько времени понадобится для скачивания:фильма,размером 4 гига байта),игры размером 1 гегабайта 200 мегабайт.
№2
Вычислить инфармационный объём твоей тетради(48 листов),если за ёмкость клеточки брать 1 байт.
№3
Объём жёсткого диска компютера в школе составляет 500 гига байт.Вычислить количество программ,которые можно установить на компьютер,если принять размер 1 программы за 500 мега байт.
Умоляю решите!!!Даю 20 балов!!!
оооочень буду благодарна ! хочу понять!ПОМОГИТЕ МНЕ
Читайте также
написать программу по которой
найти минимальный и максимальный элемент массива и все элементы между ними заменить 0...(10,50)
Срочно
Практическое задание
Открой
файл кр1-1.docx.
Выполни редактирование и форматирование текстового документа так, чтобы его вид
совпал с образцом текста, выданного учителем:
Достаточно ли видеопамяти объемом 256 кбайт для работы монитора в режиме 640х480 и палитрой из 16 цветов.
Оформить как задачу (Дано, решение, все формулы и т.п)
Дам за него 15 баллов. Пожалуйста, помогите!