Viết chương trình tính tổng của 3 số x,y,z có giá trị được nhập vào từ bàn phím. In kết quả tổng ra màn hình.

program tong;
uses crt;
var x, y, z: integer;
begin
clrscr;
write('nhap so x :');readln(x);
write('nhap so y :');readln(y);
write('nhap so z :');readln(z);
writeln('tong cua ba so la :', x+y+z);
readln
end.

Bạn tham khảo:

Program tong_ba_so;
uses crt;
Var x, y, z: integer;
Begin
Clrscr;
Write('Ban hay nhap so x:'); readln(x);
Write('Ban hay nhap so y:'); readln(y);
Write('Ban hay nhap so z:'); readln(z);
Writeln('Tong cua ba so la :', x + y + z);
Readln;
End.