ai giú mình lập trình pascal với: TAMGIAC7.pas Viêt chương trình đọc 3 số a,b,c Lập trình trả lời các yêu cầu sau: Đó có phải là ssoos đo 3 canh của tam giác không? -Nếu phải ghi YES và tính S ta...

BR

balck rose

22 tháng 4 2018

ai giú mình lập trình pascal với: TAMGIAC7.pas Viêt chương trình đọc 3 số a,b,c Lập trình trả lời các yêu cầu sau: Đó có phải là ssoos đo 3 canh của tam giác không? -Nếu phải ghi YES và tính S tam giác đó -Nếu không phatr ghi NO (Ghi chú:Áp dụng công thức sau để tính diện tích tam giác) S=căn 2 của p(p-a)(p-b)(p-c) Trong đó:P=(a,b,c)/2 Tamgiac7.inp Tamgiac7.out 315 NO 334 YES 4,47 Ai...

Đọc tiếp

#Tin học lớp 8

0

A

Anhthuwliz

25 tháng 12 2021

Câu 2: Viết chương trình bằng ngôn ngữ lập trình Pascal để nhập ba số a, b, c nguyên dương từ bàn
phím và kiểm tra ba số a, b, c có phải là độ dài ba cạnh của một tam giác không?

#Tin học lớp 8

1

BN

Bảo Nam

2 tháng 6 2022

a = int(input())
b = int(input())
c = int(input())
if a**2+b**2==c**2:
print(a,b,c,"la ba canh cua tam giac")
elif a**2+c**2==b**2:
print(a,b,c,"la ba canh cua tam giac")
elif b**2+c**2==a**2:
print(a,b,c,"la ba canh cua tam giac")
else:
print(a,b,c,"khong la ba canh cua tam giac")

Đúng(0)

NT

NGUYỄN THỊ NHƯ Ý

20 tháng 5 2020 - olm

Viết chương trình để nhập 3 số a,b,c bất kì từ bàn phím kiểm tra 3 số đó có phải là 3 cạnh của tam giác không?nếu là tam giác thì tam giác đó là tam giác gì? TIN PASCAL LỚP 8

#Ngữ văn lớp 8

0

PV

Phạm Vũ Hoài Châu

2 tháng 1 2021

Viết chương trình cho phép nhập vào ba số a,b,c kiểm tra xem 3 số đó có phải độ dài của ba cạnh tam giác hay không. Nếu đúng in dòng chữ là độ dài ba canh của tam giác va tính chu vi của tam giác đó. Ngược lại nếu sai in dòng chữ không phải là độ dài 3 cạnh của tam giác GIÚP MÌNH VỚI MÌNH SẮP THI RỒI XIN CẢM...

Đọc tiếp

#Tin học lớp 8

2

NL

Nguyễn Lê Phước Thịnh

2 tháng 1 2021

uses crt;

var a,b,c:real;

begin

clrscr;

repeat

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

until (a>0) and (b>0) and (c>0);

if (a+b>c) and (a+c>b) and (b+c>a) then

begin

writeln('La do dai ba canh cua tam giac');

writeln('Chu vi tam giac la: ',a+b+c:4:2);

end

else writeln('Khong phai la do dai 3 canh cua tam giac');

readln;

end.

Đúng(2)

PV

Phạm Vũ Hoài Châu

2 tháng 1 2021

bạn ơi bạn có thể giải thích giúp mình repeat, until là gì không ạ và hình như chương trình của bạn mình nghĩ chắc đúng rồi đó nhưng bạn xét dùm mình xem chỗ var a,b,c,CV:word thì có đúng kh ạ

Đúng(0)

LT

Linh Thùy

3 tháng 4 2021

Viết chương trình nhập từ bàn phím 3 số a,b,c . Kiểm tra xem 3 số đó có phải 3 cạnh của tam giác không . Nếu là 3 cạnh thì tính chu vi và diện tích của tam giác đó . Ghi kết quả bài toán vào tập bai1.inp

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

3 tháng 4 2021

uses crt;

const fi='bai1.inp';

var f1:text;

a,b,c,cv,dt,p:real;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

if (a>0) and (b>0) and (c>0) and (a+b>c) and (a+c>b) and (b+c>a) then

begin

cv:=a+b+c;

p:=cv/2;

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

writeln(f1,'Chu vi la: ',cv:4:2);

writeln(f1,'Dien tich la: ',dt:4:2);

end

else writeln(f1,'Day khong la ba canh trong mot tam giac');

close(f1);

readln;

end.

Đúng(0)

NL

Nguyễn Lưu Bảo Ngọc

13 tháng 2 2022

cho em hỏi cái này viết ra thuật toán thì viết kiểu sao ạ

Đúng(0)

NN

Nguyễn Nhi

18 tháng 2 2022

Viết chương trình nhập vào 3 số a, b, c. Kiểm tra 3 số đó có phải là 3 cạnh của 1 tam giác hay không? Nếu phải, kiểm tra tam giác đó có phải là tam giác đều

#Tin học lớp 11

1