pascal 8

[longhama6a2]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

1/Viết chương trình nhập vào 2 số nguyên a và b.Máy hỏi tổng hai số là bao nhiêu?Nếu ta nhập đúng thì máy thông báo”Chúc mừng!Bạn đã tính đúng”.Nếu nhập sai thì máy thông báo:”Rất tiếc!Bạn đã tính sai” và máy hiện kết quả đúng ra màn hình?viết dùm nha nhớ phải thử xem chạy đc hk nha

 

[binhlblb123]

giải:
uses crt;
var a,b,c,d:longint;
begin
clrscr;
writeln('Nhap hai so: ');readln(a,b);
c:=a+b;
writeln('Nhap tong cua 2 so tren');readln(d);
if d=c then writeln('Chuc mung')
else writeln('Sai');
readln
end.