program Tam-giac-deu;
uses crt;
var a,b,c:integer;
begin
writeln(' Nhap so a '); readln(a);
writeln('Nhap so b' ); readln(b);
writeln('Nhap so c'); readln(c);
if (a=b) and (b=c) then writeln('do la ba canh tam giac deu')
else writeln('đó ko phải ba cạnh tam giác đều');
readln
end.
Hãy viết chương trình nhập ba số dương a, b và c từ bàn phím, kiểm tra và in kết quả ra màn hình kiểm tra ba số đó có thể là độ dài ba cạnh của một tam giác hay không?
Ai biết giúp với !!! Cần gấp gấp gấp lắm
Viết chương trình nhập vào từ bàn phím 3 cạnh a, b, c của một tam giác. Kiểm tra và hiển thị tam giác đó là tam giác vuông hay không?
Viết chương trình giải phương trình ax + b = 0 (các hệ số a,b được nhập từ bàn phím)
Hướng dẫn có sẵn trong bài là:
- Nếu a khác 0 thì phương trình có nghiệm x=-b/a(âm b phần a)
- Nếu a = 0 và b = 0 thì phương trình có vô số nghiệm
- Nếu a = 0 và b khác 0 thì phương trình vô nghiệm
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?
Viết chương trình nhập vào 3 cạnh a,b,c(số dương),sau đó kiểm tra xem có thành lập được 1 tam giác hay không ?
Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Làm giúp với !
Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Làm giúp với !
Câu 1; Viết chương trình cho phép người dùng nhập 1 số nguyên từ bàn phím, chương trình sẽ cho biết số đó là số chẵn hay lẻ.
Câu2. Viết các biểu thức toán sau đây dưới dạng biểu thức trong Pascal
a) \(\dfrac{15}{2+3}\)-\(\dfrac{8}{x^3}\)+y
b) \(\dfrac{\left(10+x\right)^2}{3+y}\)-\(\dfrac{18}{5+y}\)
Câu 3. Bạn Tuấn viết chương trình như sau:
1. program Tinh toan
2. uses crt;
3. var
4. x, y : integer;
5. tb = real;
6. thongbao : integer;
7. const a := 2;
8. begin
9. clrscr;
10. thongbao := ‘Trung binh cong cua hai so x va y la: ‘;
11. write(‘Nhap gai tri cho x = ‘); readln(x);
12. write(‘Nhap gia tri cho y = ‘); readln(y);
13. tb = (x+y)/a;
14. writeln(thongbao, tb:2:1);
15. readln;
16. end.
a. ) Có một vài câu lệnh bạn Tuấn viết sai, em hãy viết lại cho đúng
b. ) Hãy phân biệt tên biến, tên hằng trong chương trình trên
Câu 4 : Viết chương trình đưa thông báo sau ra màn hình, mỗi thông báo trên một dòng:
GIÚP MIK VỚI !!!!!!!!!!!!!!!!
