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
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
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: Viết chương trình nhập bán kính tính diện tích và chu vi của một hình tròn
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.
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.
Xem thêm: Chuyên Đề Phương Trình Tiếp Tuyến Của Đường Tròn Có Lời Giải
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).
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.
(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)
2: Viết chương trình sử dụng lệnh lặp để tính trung bình cộng của N số thực. Với số N và các số tính trung bình cộng được nhập vào từ bàn phím.Câu 3: Viết chương trình nhận biết một số tự nhiên N được nhập từ bàn phím có phải là số nguyên tố hay không.
Lớp 8 Tin học
3
1
Gửi Hủy
Đúng 0
Bình luận (0)
Đúng 0
Bình luận (0)
Câu 3:
uses crt;
var n,i,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
if n>1 then
begin
kt:=0;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if kt=0 then writeln(n,' la so nguyen to')
else writeln(n,' la hop so');
end
else writeln(n,' khong la so nguyen to cung khong la hop so');
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.
Xem thêm: Tiểu Luận Tiếng Anh Mẫu – Cách Viết Bài Tiểu Luận Tiếng Anh
❤✿
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
clrscr;
write('nhap canh a: ');readln(a);
P:=a*4;
S:=a*a;
writeln('Chu vihinh vuong canh a la:',P);
writeln('Dien tich hinh vuong canh a la: ',S);
Đúng 0
Bình luận (2)
speeed
Đúng 1
Bình luận (0)
uses crt;
var a,cv,dt:real;
begin
clrscr;
repeat
write('Nhap a='); readln(a);
until a>0;
cv:=a*4;
dt:=sqr(a);
writeln('Chu vi la: ',cv:4:2);
writeln('Dien tich la: ',dt:4:2);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập dãy n số nguyên từ bàn phím và in ra màn hình số nhỏ nhất và lớn nhất với n được nhập từ bàn phím
Lớp 8 Tin học Bài 8. Lặp với số lần chưa biết trước
2
1
Gửi Hủy
uses crt;