Cho chương trình sau: Program CT1; Var X, Y: integer; S: real; begin X:=15; Y:=25; S:=(X + Y)/2; writeln(S:4:2); readln; End. Hãy cho biết kết quả sau khi thực hiện chương trình?

1 câu trả lời

`*` Ban đầu X = 15, Y = 25

`*` S = (X + Y) / 2 = (15 + 25) / 2 = 40 / 2 = 20

`*` Writeln(S : 4 : 2) - In giá trị S với 2 chữ số sau thập phân

`*` Kết quả: 20.00