K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

16 tháng 11 2021

Program Chu_nhat; uses crt;

Var a, b, S, CV: real;

Begin    

 Write('Nhap chieu dai:'); readln(a);      

Write('Nhap chieu rong:'); readln(b);  

   S := a*b;      

CV := (a+b)*2;    

 Writeln('Dien tich hinh chu nhat la:',S:3:2);  

   Writeln('Chu vi hinh chu nhat la:',CV:3:2);    

 readln;

end.

 

 

23 tháng 5 2022

Program chunhat;

uses crt;

var a,b,p,s:real;

begin

clrscr;

writeln('Nhap chieu dai va rong cua hinh chu nhat: ');

readln(a,b);

s:=a*b;
p:=(a+b)*2;

write('Chu vi hinh chu nhat la: ', p:1:2);

writeln;

write('Dien tich hinh chu nhat la: ', s:1:2);

readln;

end.
 

Kết quả: 

16 tháng 11 2021

uses crt;

var a,b:real;

begin

clrscr;

readln(a,b);

writeln(2*(a+b):4:2);

writeln(a*b:4:2);

readln;

end.

D
datcoder
CTVVIP
14 tháng 10 2023

loading...

 

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

cout<<"Chu vi la: "<<fixed<<setprecision(2)<<(a+b)*2<<endl;

cout<<"Dien tich la: "<<fixed<<setprecision(2)<<a*b;

return 0;

}

5 tháng 11 2021

uses crt;

var r,cd,cr,s,p: real;

begin

clrscr;

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

cd:=r*2*3.14;

cr:=1/3*cd;

s:=cd*cr;

p:=(cd+cr)*2;

writeln('Dien tich la: ',s);

writeln('Chu vi la: ',p);

readln;

end.

11 tháng 12 2016

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!

11 tháng 12 2016

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)

 

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<(a+b)*2<<endl;

cout<<a*b;

return 0;

}

2 tháng 11 2021

#include <bits/stdc++.h>

using namespace std;

int a,b,dt;

int main()

{

cout<<"Nhap chieu dai: ";

cin>>a;

cout<<"Nhap chieu rong: ";

cin>>b;

dt=a*b;

cout<<"Dien tich la: "<<dt;

Return 0;

}

2 tháng 11 2021

lớp 8 mới học pascal thôi nha: