Viết chương trình tính chu vi hình tròn biết bán kính r hiển thị giá trị chu vi ra màn hình

Viết chương trình tính chu vi và diện tích hình tròn bán kính R, biết rằng R là số thực và được nhập vào từ bàn phím, biết hằng số Pi có giá trị = 3.14

(Chu vi = 2.Pi.R, Diện tích = Pi.R2 là các số thực).

Câu hỏi : Viết chương trình tính chu vi và diện tích hình tròn.

Lời giải:

Program chuvihinhtron_dientichhinhtron;

Uses crt;

Var R: integer ;

S,C : real;

Const Pi=3,14;

Begin

clrser;

Writeln(‘R= ‘); Readln(R);

C:=Pi*2*R;

S:=Pi*R*R;

Writeln(‘Chu vi la C= ‘,C);

Writeln(‘Dien tich la S= ‘,S);

Readln

End.

Cùng Top lời giải tìm hiểu thêm về Pascal nhé:

1. Pascal là gì? Ngôn ngữ lập trình Pascal

- Pascal được hiểu như là ngôn ngữ lập trình máy tính theo dạng lệnh được phát triển bởi giáo sưNiklaus Wirth(trường đại học kĩ thuật Zurich – Thụy Sĩ). Pascal được phát triển từ năm 1970 và là kiểu ngôn ngữ đặc biệt thích hợp cho lối lập trình có cấu trúc. Về bản chất Pascal dựa trên ngôn ngữ lập trình ALGOL và được đặt tên theo nhà toán học và triết học Blaise Pascal(người Pháp).

2. Các thành phần trong ngôn ngữ lập trình Pascal

2.1. Các ký hiệu sử dụng trong Pascal

- Bất cứ mộtngôn ngữ lập trìnhnào cũng được xây dựng từ một số hữu hạn các ký hiệu. Trong ngôn ngữ Pascal được xây dựng từ các ký hiệu:

Begin,end,var,while,do,{,},;, …

Và các kí tựa,b,c,d, …,A,B,C,D, …,1,2,3,4, …

- Ngôn ngữ Pascal không dùng các ký hiệu của bộ chữ Hy Lạp.

- Để xây dựng thành chương trình, các ký hiệu phảI tuân theo những quy ước về ngữ pháp và ngữ nghĩa quy định của Pascal.

a)Danh hiệu (identifiler)

Trong Pascal, để đặt tên cho cácbiến,hằng,kiểu,chương trình con, ta dùngdanh hiệu(indentifiler). Danh hiệu trong Pascal quy định bắt đầu phảI là một chữ cái, sau đó có thể là chữ cái, chữ số hau là dấu gạch dướI “_”.

Ví dụ:

Tam

X

PT_bac_1

Delta

Z200

Ví dụ:các biến sau không phảI là danh hiệu

2bien

n!

Bien x

- Trong Pascal danh hiệu không phân biệt chữ thường và chữ hoa.

Ví dụ:y vớI Y là một. Thanh_Da và THANH_dA là một.

- Chú ý:Chúng ta không nên đặt danh hiệu trùng vớI danh hiệu của ngôn ngữ và nên dùng danh hiệu có tính gợI nhớ để dễ viết và kiểm tra chương trình, người đọc cũng cảm thấy dễ hiểu.

Ví dụ:Write, Writeln, read, readln, sqrt, integer, real …

b)Từ khoá (key word)

- Trong ngôn ngữ có những từ được dành riêng như là những phần tử tạo nên ngôn ngữ. Do đó chúng ta không được đặt những danh hiệu trùng với những từ dành riêng này. Người ta thường gọi những từ này là từ khoá (key word).

Ví dụ:Program,begin,end,while,do,procedure,function,type,var…

- Từ dành riêng này cũng không phân biệt chữ thường và chữ hoa.

c)Khoảng trắng, dấu chấm phẩy, dấu móc, dấu nháy đơn, toán tử, toánhạng.

- Khoảng trắng “ “: Dùng để cách biệt 2 từ trong chuỗi.

- Dấu chấm phẩy “;”: Dùng sau tên chương trình, sau các câu lệnh.

- Dấu móc “{ }”: Trong Pascal những gì đặt trong hai dấu móc sẽ là phần ghi chú.

- Dấu nháy đơn “’”: Dùng để bao một chuỗi.

- Toán tử: Đặt giữa hai toán hạng. Ví dụ: x+2, y=8, 7>3, x<7, z>=y … vậy +, =, >, <, <= là các toán tử, còn hai bên sẽ là các toán hạng.

2.2 Các dạng câu lệnh trong chương trình Pascal

Câu lệnh if…then…

Nếu <Điều Kiện> thì

If <Điều kiện> then

Nếu điều kiện true thì biểu thức sẽ được thực hiện, còn nếu điều kiện false thì biểu thức sẽ không được thực hiện.

Câu lệnh if… then…. được dùng trong trường hợp để so sánh các phép toán hoặc các phép toán có điều kiện.

Ví dụ:So sánh hai số a, b

Nếu a>b thì in số a ra màn hình

If a>0 then writeln (‘a la so lon hon’);

Câu lệnh for…do…

Câu lệnh for…do…. nghĩa là lặp với số lần biết trước, nếu ta biết được số lần lặp lại của một dãy số, một tổng,… thì ta sẽ sử dụng for…do….

For := to do

Trong đó:

- Biến có kiểu số nguyên integer

- Giá trị cuối phải lớn hơn giá trị đầu và là kiểu số nguyên.

- Câu lệnh có thể là câu lệnh đơn (một lệnh) hay lệnh ghép (nhiều lệnh)

Ví dụ: Tính tổng từ 1 tới 10 bằng Pascal

Câu lệnh while…do…

- Câu lệnh while… do… nghĩa là lặp với số lần chưa biết trước và phụ thuộc vào một điều kiện cụ thể và chỉ dừng lại khi điều kiện đó sai.

- Trong Pascal câu lệnh lặp với số lần chưa biết trước là:

while <điều kiện> do ;

Ví dụ: Tính S là tổng các số tự nhiên sao cho số S nhỏ nhất để S > 1000

Lorem ipsum dolor sit amet, consectetur adipiscing elit.Morbi adipiscing gravdio, sit amet suscipit risus ultrices eu.Fusce viverra neque at purus laoreet consequa.Vivamus vulputate posuere nisl quis consequat.

Create an account

Bạn đang xem: (Pascal) Nhập Vào Bán Kính Của Hình Tròn Tại Lingocard.vn

Tất cả Lớp 12 Lớp 11 Lớp 10 Lớp 9 Lớp 8 Lớp 7 Lớp 6 Lớp 5 Lớp 4 Lớp 3 Lớp 2 Lớp 1

Viết chương trình tính chu vi hình tròn biết bán kính r hiển thị giá trị chu vi ra màn hình

1. Viết chương trình tính diện tích và chu vi của hình tròn biết bán kính r nhập vào từ bàn phímĐANG CẦN GẤP HELP MEE

Viết chương trình tính chu vi hình tròn biết bán kính r hiển thị giá trị chu vi ra màn hình

Program lingocard.vn;

Uses crt;

Var r,S,C:real;

Begin

Write ('Ban kinh la');

Readln (r);

S:=r*r*3.14;

C:=r*2*3.14;

Writeln ('Chu vi la',C);

Writeln ('Dien tich la',S);

Readln;

End.

Đang xem: Nhập vào bán kính của hình tròn in ra màn hình diện tích và chu vi của nó

Viết chương trình tính chu vi hình tròn biết bán kính r hiển thị giá trị chu vi ra màn hình

uses crt;

var r,cv,dt:real;

begin

clrscr;

repeat

write('Nhap ban kinh:');readln(r);

until r>0;

cv:=r*2*pi;

dt:=sqr(r)*pi;

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

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

readln;

end.

Viết chương trình tính chu vi và diện tích hình tròn bán kính R, biết rằng R là số thực và được nhập vào từ bàn phím, biết hằng số Pi có giá trị = 3.14

(Chu vi = 2.Pi.R, Diện tích = Pi.R2 là các số thực).

bài 1 : Viết chương trình tính diện tích, chu vi hình chữ nhật biết độ dài các cạnh của hình chữ nhật là các số dương được nhập từ bàn phím.In ra màn hình điện tích của chu vi của nó

Bài 2: Viết chương trình tính diện tích và chu vi của hình tròn biết bán kính của hình tròn là số dương được nhập từ bàn phím.

( Help meeeeeeeee!!!!!!!!!!!!!! lưu ý, giải câu nào cx đc ạ, 2 câu thì mik càng cảm ơn ^^)

CÂU 1:

program hinhchunhat;

var a,b,S,C: real;

begin

Write(“Nhapdodaicanhthuchata=”);readln(a);

Write(“Nhapdodaicanhthuhaib=”);readln(b);

S:= a*b;

C:=(a+b)*2;

Writeln(“Dientichhinhchunhatla:”,S);

Writeln(“Chuvihinhchunhatla:”,C);

readln

end.

CHÚC BẠN HỌC TỐT!

CÂU 2:(lưu ý: câu này thì mik viết chương trình với bán kính hình tròn là sớ thực được nhập từ bàn phím còn số dương thì bn tự tìm hiểu nhe. nếu tìm hiểu đc thì bn chỉ cần thay phần khai báo var thôi nhe.)

program hinhtron;

var r:real;

const pi=3.14;

begin

clrscr;

Write(“Nhapbankinh:”);readln(r);

Writeln(“Chuvihinhtronla:”,2*pi*r);

Writeln(“Dientichhinhtronla:”,pi*r*r);

readln

end.

CHÚC BẠN HỌC TỐT (x2)

B1:Biết chiều dài và chiều rộng của hình chữ nhật.

B2:Lấy chiều dài nhân rộng.

B3:Viết đáp số.

B4:Viết chương trình và kết thúc thuật toán.

Viết chương trình tính diện tích của một hình tam giác, biết rằng chiều cao h và cạnh đáy a là các số thực và được nhập vào từ bàn phím.

Xem thêm: Bộ Tài Liệu Tin Học Văn Phòng Excel, Powerpoint,, Bộ Tài Liệu Tự Học Microsoft Excel Bao Gồm

(Diện tích = (cạnh đáy* chiều cao)/2).

câu 1 em hãy sử dụng công thức hê-rông lập chương trình tính và hiển thị ra màn hình máy tính diện tích hình tam giác với chiều dài 3 canh a,b,c được nhập từ bàn phím (lưu ý dùng p=(a+b+c)/2)

câu 2 hãy lập chương trình nhập từ bàn phím một dãy số nguyên n phần tử (với n

Câu 1:

uses crt;

var a,b,c,p,s: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

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

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

writeln('Dien tich tam giac la: ',s:4:2);

end

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

readln;

end.

Câu 2:

uses crt;

var a:array<1..100>of integer;

i,n,t,max,min:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('A<',i,'>='); readln(a);

end;

t:=0;

for i:=1 to n do

t:=t+a;

writeln('Tong cac phan tu trong day la: ',t);

max:=a<1>;

min:=a<1>;

for i:=1 to n do

begin

if maxa then min:=a;

end;

writeln('Gia tri lon nhat la: ',max);

writeln('Gia tri nho nhat la: ',min);

readln;

end.

Đúng 1
Bình luận (1)

viết chương trình tính chu vi, diên tích hình vuông với cạnh a được nhập vào từ bàn phím.❤✿

mn giúp em với ạ T4 em thi rồi!!! Lớp 8 Tin học Lập trình đơn giản 3 1

Gửi Hủy