Viết chương trình nhập vào 2 số a và b và tính A=3. giúp mình mình cần gấppp
2 câu trả lời
program tinh;
uses crt;
var a, b, A:real;
begin
clrscr;
write('Nhap hai so a va b'); readln(a,b);
A:=3*a+b;
write('A=',A);
readln
end.
$#QLinkVN$
CẤU TRÚC CHƯƠNG TRÌNH CỤ THỂ NHƯ SAU:
program nhanhthoi;
uses crt;
var a,b,PT: integer;
begin
clrscr;
writeln('Nhap gia tri a: '); readln(a);
writeln('Nhap gia tri b: '); readln(b);
PT:=3*a+b;
writeln('Vay bieu thuc A co gia tri la: ',PT);
readln;
end.
Câu hỏi trong lớp
Xem thêm