Viết câu lệnh tính toán và in ra màn hình kết quả của giá trị biểu thức: A=(15+20) div 2 nhanh lên nha giúp mình

2 câu trả lời

Câu lệnh tính toán:

var A: integer;
begin
    A:=(15+20) div 2;
    writeln(A);
    readln
end.

Kết qua in ra: 17

uses crt;

var A : integer;

begin

clrscr;

A := (15 + 20) div 2;

writeln('Gia tri A = ', A);

readln

end.