Viết CT tính S =2x +3y . Mong mọi người giúp đỡ ạ

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.

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