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.

29 tháng 8 2023

program TinhDienTichHinhTron;
var
  fIn, fOut: Text;
  r: Integer;
  dien_tich: Real;
begin
  Assign(fIn, 'dt_ht.inp');
  Reset(fIn);
  Readln(fIn, r);
  Close(fIn);

  Assign(fOut, 'dt_ht.out');
  Rewrite(fOut);

  dien_tich := Pi * r * r;

  Writeln(fOut, FormatFloat('0.00', dien_tich));

  Close(fOut);
end.

28 tháng 9 2021

Code c:

 

#include <stdio.h>

#include <conio.h>

#include <math.h>

#define PI 3.14159

int main() {

            int r;

            float chuvi, dientich;

            printf("Nhap ban kinh r:");

            scanf("%d", &r);

            chuvi = 2*PI*r;

            dientich = PI*r*r;

            printf("Chu vi hinh tron la: %f\n", chuvi);

            printf("Dien tich hinh tron la: %f", dientich);

            getch();

 

28 tháng 9 2021

BN THAM KHẢO:

Program S_Hinh_Tron;
Uses Crt;
Var r,S:real;
Begin
Clrscr;
Writeln(‘TINH DIEN TICH HINH TRON:’);
Write (‘Nhap ban kinh R=’);readln(r);
dt:=pi*r*r;
Writeln(‘Dien tich hinh tron la:’,dt:6:2);
Readln;
End.

23 tháng 11 2021

Tham khảo!

Program tich_chu_vi_dien_tich_hinh_tron;
uses crt; //Khai bao thu vien
var r,dien_tich,chu_vi:real; //Khai bao bien
begin
clrscr;
//Input:
   write(‘Nhap ban kinh: ‘);readln(r);
//Output:
   chu_vi:=r*2*pi;
   dien_tich:=r*r*pi;
   writeln(‘Chu vi: ‘,chu_vi:0:5);
   writeln(‘Dien tich: ‘,dien_tich:0:5);
readln
end.

1:

function dt(r:real):real;

begin

dt:=sqr(r)*pi;

end;

2:

function dt(a,b:real):real;

begin

dt:=1/2*a*b;

end;

28 tháng 12 2020

b) 

uses crt;

var i,y:integer;

begin

clrscr;

y:=0;

for i:=1 to 100 do 

  y:=y+i;

writeln('y=',y);

readln;

end.

c) 

uses crt;

var y,i:integer;

begin

clrscr;

y:=0;

i:=1;

while y<=3200 do 

  begin

y:=y+i;

inc(i);

end;

writeln('y=',y);

readln;

end.

10 tháng 8 2023

#include <iostream>

#include <iomanip>

int main() {

     int r;

     std::cin >> r;

     double pi = 3.14;

     double perimeter = 2 * pi * r;

     double area = pi * r * r;

     std::cout << std::fixed << std::setprecision(2);

     std::cout << "p= " << perimeter << std::endl;

     std::cout << "s= " << area << std::endl;

     return 0;

}

29 tháng 8 2023

#include <iostream>
#include <iomanip>
using namespace std;

int main() {
    int r;
    const float Pi = 3.14;

    cout << "Nhap ban kinh hinh tron: ";
    cin >> r;

    float chu_vi = 2 * Pi * r;
    float dien_tich = Pi * r * r;

    cout << fixed << setprecision(2);
    cout << "p= " << chu_vi << endl;
    cout << "s= " << dien_tich << endl;

    return 0;
}

14 tháng 3 2021

15 tháng 3 2021

Program HOC24;

const fi='INPUTC2.TXT';

var s,r: real;

f: text;

procedure ip;

begin 

assign(f,fi);

reset(f);

read(f,r);

s:=r*r*pi;

close(f);

end;

begin

ip;

write('S= ',s:1:2);

readln

end.

29 tháng 8 2023

PI = 3.14 R = float(input('Nhap ban kinh: ')) S = PI * R ** 2 print('Diện tích hình tròn bán kính', R, 'là:', S)
 

Các lỗi cú pháp đã được sửa:

Dòng thứ nhất: "PI= 3.14;" -> "PI = 3.14" (loại bỏ dấu chấm phẩy dư thừa)

Dòng thứ ba: "R=float(input('Nhap ban kinh: ')" -> "R = float(input('Nhap ban kinh: '))" (thiếu dấu đóng ngoặc ')' ở cuối dòng)

Dòng thứ ba: "S : PI*R**2" -> "S = PI * R ** 2" (thay dấu ':' bằng dấu '=' để gán giá trị của biểu thức)

Dòng thứ năm: "print('Diện tích hình tròn bán kính', r ' là: ',S)" -> "print('Diện tích hình tròn bán kính', R, 'là:', S)" (thay 'r' bằng 'R' để in giá trị của bán kính)

17 tháng 9 2021

program hinhtron;

var r:real;

const pi=3.14;

begin

clrscr;

Write('Nhapbankinh:');readln(r);

Writeln('Dientichhinhtronla:',pi*r*r);

readln

end.