nhập bàn phím các số thực abcd và x.Tính và đưa ra màn hình giá trị của biểu thức ax^3+bx^2+cx+d

1 câu trả lời

uses crt;
var xa,ya,xb,yb,xc,yc,p,s,ab,ac,bc:real;
begin
clrscr;
write('Nhap toa do diem A:'); readln(xa,ya);
write('Nhap toa do diem B:'); readln(xb,yb);
write('Nhap toa do diem C:'); readln(xc,yc);
ab:=sqrt(sqr(xa-xb)+sqr(ya-yb));

Câu hỏi trong lớp Xem thêm