hãy viết ct nhập vào 2 số nguyên a và b từ phím Hãy tính tổng => đưa ra kết quả
2 câu trả lời
Program tinh_tong;
Var a, b: integer;
sum: integer;
BEGIN
Write(‘Moi ban nhap vao so nguyen a: ‘);
Readln(a);
Write(‘Moi ban nhap vao so nguyen b: ‘);
Readln(b);
sum := a+b;
Writeln(‘Tong hai so ban vua nhap la: ‘,sum);
Writeln(‘Ban bam Enter de tiep tuc ‘);
Readln
END.
program tong;
uses crt;
var a, b, t : integer;
begin
clrscr;
write('nhap so nguyen a :');readln(a);
write('nhap so nguyen b :');readln(b);
t := a + b;
writeln('tong cua hai so la :', t);
readln
end.
Câu hỏi trong lớp
Xem thêm
