Tin học Viết chương trình

[ahihiiloveyou]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

viết chương trình nhập vào bán kính 4 hình tròn R1 , R2 , R3 , R4 . Tính và xuất ra màn hình tổng diện tích 4 hình tròn
S = diện tích (R1) + diện tích (R2) + diện tích (R3) + diện tích (R4) bằng cách xây dựng hàm tính diện tích hình tròn

 

[Thanh Phuong Tran]

Đây là CT cơ bản nhất luôn nha bạn ơi! Nó cực kì dễ hiểu! Mình có viết ra mấy phần chú thích cho bạn dễ hiểu hơn!
Nếu không hiểu chỗ nào bạn cứ hỏi mình!

 

[ahihiiloveyou]

View attachment 47427
Đây là CT cơ bản nhất luôn nha bạn ơi! Nó cực kì dễ hiểu! Mình có viết ra mấy phần chú thích cho bạn dễ hiểu hơn!
Nếu không hiểu chỗ nào bạn cứ hỏi mình!

bạn ơi viết theo kiểu function á bạn mình không hiểu cách viết function !

 

[Thanh Phuong Tran]

bạn ơi viết theo kiểu function á bạn mình không hiểu cách viết function !

Mình đâu có viết kiểu Function đâu bạn! Nó là cái cơ bản lắm luôn á! Nó chỉ là chương trình cơ bản thôi bạn ạ!

 

[ahihiiloveyou]

Mình đâu có viết kiểu Function đâu bạn! Nó là cái cơ bản lắm luôn á! Nó chỉ là chương trình cơ bản thôi bạn ạ!

Hong ý mình nói là bt này viết theo kiểu function thì viết ntn chứ cái viết theo cơ bản mình biết làm rồi bạn ơi !

 

[Thanh Phuong Tran]

Vậy đơn giản mà! Bạn chỉ cần tách cái nhập dữ liệu và cái thực hiện công thức tính bỏ hết vào hai lần Procedure hay là một lần Procedure để nhập dữ liệu và một Function để thực hiện công thức tính!
-----------------------------------------------------------------
Procedure nhapdulieu();
begin
Phần nhập dữ liệu!
end;
{---------------}
Function sum(R1,R2,R3,R4:longint):longint;
begin
Phần thực hiện công thức tính+Phần tính tổng diện tích!
s:=sum;
end;
begin
Cú pháp gọi CT con!
readln;
end.

 

[hdiemht]

Tin 11 dụng Free Pascal sao ko dùng TuborPascal nhi

 

[ahihiiloveyou]

Tin 11 dụng Free Pascal sao ko dùng TuborPascal nhi

tại trường mình ko cho dùng bạn ơi