Viết 2 ctr con tìm chu vi và diện tích của 1 hcn áp dụng các ctr con đó để tìm chu vi và S của n hình chữ nhật với chiều dài và chiều rộng được nhập từ bàn phím. Ai biết giúp mik với

hoatong

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 30 xem

1 trả lời

Thích Trả lời

djchip1959

var d, r: real;

Function CV(x, y: real): real;

Begin

CV:=(x+y)*2;

End;

Function DT(x, y: real): real;

Begin

DT:=a*b;

End;

Begin

Write('nhap chieu dai va chieu rong: ');

Readln(d, r);

Writeln('chu vi: ', cv(d, r));

Write('dien tich: ', dt(d, r));

Readln

End.

Vote (0) Phản hồi (0) 2 năm trước

663376404491602

program Mang;
uses crt;
var a,b: array[1..10000] of integer;
n,i: integer;

function dientich(a,b: integer):integer;
begin
dientich:=a*b;
end;

function chuvi(a,b: integer):integer;
begin
chuvi:=(a+b)*2;
end;

begin
       clrscr;

       write('Nhap so hinh chu nhat= ');readln(n);

       for i:=1 to n do
           begin

              write('Chieu dai hcn thu ',i,': ');readln(a[i]);

              write('Chieu rong hcn thu ',i,': ');readln(b[i]);

           end;

        writeln('----------------------');

        for i:=1 to n do

             begin

writeln('Dientich hcn thu ',i,': ',dientich(a[i],b[i]));

        writeln('Chuvi hcn thu ',i,': ',chuvi(a[i],b[i]));

             end;
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Cho tam giác ABC vuông tại A. Qua A kẻ đường cao AH (H thuộc BC). a) Chứng minh rằng tam tam giác ABC đồng dạng với tam giác HAC. b) Khi cho AB = 6cm, AC = 8cm, tính độ dài đoạn BC và AH. c) Từ H kẻ HE vuông góc với AC tại E. Chứng minh rằng HE^2 = AE.EC.

Trên hai đĩa cân đựng có 2 cốc,cốc 1 đựng dung dịch axit HCl, cốc 2 đựng dung dịch axit H2SO4 sao cho cân ở vị trí thăng bằng. - Cho vào cốc đựng dung dịch HCl 25 gam CaCO3. - Cho vào cốc đựng dung dịch H2SO4 a gam Al. Cân vẫn ở vị trí thăng bằng. Lập PTHH và tính a. ( Biết CaCO3 + HCl CaCl2 + CO2 + H2O)

Có thể dùng dây đồng có cùng đường kính thay cho dây chảy của cầu chì đã bị nóng chảy được không? Tại sao?

Giải giúp tôi bài tập với ạ khó quá

Viết đoạn văn 7 câu nêu suy nghĩ của em về vai trò của trần quốc tuấn với dân tộc ( mk cần gấp ạ)

Viết đoạn văn về bài sống chết mặc bay 8-10 câu càng hay càng tốt

Hãy trình bày kết cục hạn chế của các đề nghị cải cách duy tân ở VN nửa cuối thế kỷ 19? Trình bày suy nghĩ của Em về nhận định sau: nếu VN tiến hành cải cách thì sẽ thoát khỏi nguy cơ trở thành thuộc địa và trở thành nhật thứ hai Từ đó rút ra bài học cho Việt Nam trong giai đọan hiện nay

Trong xilanh của một động cơ đốt trong 3 lít hỗn hợp khí ở áp suất 10^5 Pa và nhiệt độ 320°k .Pittông nén làm cho hỗn hợp khí chỉ còn 0,25 lít và áp suất tăng tới 18×10^5Pa .Tính nhiệt độ của hỗn hợp khí nén

viết một đoạn văn từ 3 đến 5 câu nói về niềm vui của em khi được sống hòa nhập với thiên nhiên và vạn vật giúp mình với

Cho mình hỏi câu 2 và 4 gấp luôn ạ mình cảm ơn và sẽ tăng xu theo yêu cầu

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến