c1Darkness1c
09.06.2022 04:10

составить программу на паскале абс,


составить программу на паскале абс,

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Keenio
29.06.2021 13:29

{ Треугольник задан координатами вершин (x1;y1),(x2;y2),(x3;y3).

Найти площадь треугольника (используя формулу Герона) }

uses crt;

var x1,x2,x3,y1,y2,y3,a,b,c,s,p : real;

begin

clrscr;

write('x1=');readln(x1);

write('y1=');readln(y1);

write('x2=');readln(x2);

write('y2=');readln(y2);

write('x3=');readln(x3);

write('y3=');readln(y3);

a:=sqrt(sqr(x1-x2)+sqr(y1-y2));

b:=sqrt(sqr(x2-x3)+sqr(y2-y3));

c:=sqrt(sqr(x3-x1)+sqr(y1-y3));

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

write('s=',s);

readln;

end.

формула герона!

А так я думаю эти задачки очень даже не сложные, только формулы надо знать!! !

периметр- это сумма всех сторон

например

begin

writteln( 'введите 3 стороны' ) ;

readln(a,b,c);

writeln(' периметр = ',a+b+c);

readln;

end.

Вот и все!! !

Удачи!

0,0(0 оценок)
Ответ:
LTKaty
11.10.2022 11:54

#include <iostream>

using namespace std;

int main()

{

int a[12] = {}, b = 100;

for(int i = 0; i < 12; i++) {

 cout << "Input a[" << i << "]: ";

 cin >> a[i];

 if ((a[i] % 2 == 1) && (a[i] > 0) && (9 < a[i]) && (a[i] < 100) && (a[i] < b))

  b = a[i];

}

if (b == 100) {

 cout << "Numbers do not satisfy the condition";

 return 1;

}

else cout << "The given number is " << b;

return 0;

}

//Так как Tab'ы временно не сохраняются в редакторе, прилагаю .cpp файл. Язык С++

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота