2 câu trả lời
program tinh;
uses crt;
var x, y, S : real;
begin
crlscr;
write(' nhap so x : ');
readln(x);
write('nhap so y :');
readln(y);
S := 2*x + 3*y;
writeln(' gia tri cua S la :', S);
readln
end.
uses crt;
var x,y:real;
begin
clrscr;
read(x,y);
writeln(2 * x + 3 * y:0:2);
readln; readln;
end.