thầy mình kêu mình viết chương trình bài này ra cần gấp thầy kêu làm xong phải nộp luônHoidap247.com - Hỏi đáp bài tài x Q Search find results
O Lý thuyết Tin

Question

thầy mình kêu mình viết chương trình bài này ra cần gấp thầy kêu làm xong phải nộp luôn

qtruong · Answer

Program tinh;
Uses crt;
Var s1, s2, s, a, b: real;
Const pi=3.14;
Begin
     Clrscr;
     Write('Nhap a = '); readln(a);
     Write('Nhap b = '); readln(b);
     s1:=2*a*b;
     s2:=(pi*a*a)/2;
     s:=s1+s2;
     Writeln('Dien tich cua hinh la: ',s:8:2);
Readln
End.

dovanhung · Answer

program dt;
uses crt;
var a,b:integer;s,s1,s2:real;
const pi=3.14;
begin
         clrscr;
         readln(a);readln(b);
         s1:=2*a*b;
         s2:=(pi*sqr(a))/2;
         s:=s1+s2;
         write(s);
readln;readln;
end.

thầy mình kêu mình viết chương trình bài này ra cần gấp thầy kêu làm xong phải nộp luôn

TRẢ LỜI

Bạn muốn hỏi điều gì?

Tham Gia Group Dành Cho 2K10 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bạn muốn hỏi điều gì?

Tìm kiếm với hình ảnh

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Lưu vào

thầy mình kêu mình viết chương trình bài này ra cần gấp thầy kêu làm xong phải nộp luôn

TRẢ LỜI

Bạn muốn hỏi điều gì?

Tham Gia Group Dành Cho 2K10 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bạn muốn hỏi điều gì?

Lý do báo cáo vi phạm?