Viết CT tính giá trị biểu thức p= (2a+5b) ² với a,b là số dương nhập từ bàn phím,in kết quả ra màn hình.

2 câu trả lời

program tinh_bieu_thuc;

uses crt;

var a,b:integer;

P:real;

begin

write('nhap so duong 1: ');readln(a);

write('nhap so duong 2:' );readln(b);

P:=(2*a+5*b)*(2*a+5*b);

writeln('Gia tri cua P la: ',P);

readln;

end.

program tinh;

uses crt;

var a, b, p : integer;

begin

clrscr;

write('nhap so duong a :');readln(a);

write('nhap so duong b :');readln(b);

p := sqr(2*a + 5*b);

writeln('gia tri bieu thuc p la :', p);

readln

end.

Câu hỏi trong lớp Xem thêm