Viết chương trình bằng ngôn ngữ pascal nhập 3 số từ bàn phím và hiển thị kết quả ra màn hình Tổng và Hiệu của 3 số đó.

2 câu trả lời

program trm;

Var

         a,b,c,tong,hieu:integer;

Begin

         write('Nhap 3 so do: '); readln(a,b,c);

         tong:=a+b+c; hieu:=a-b-c;

         write('Tong cua 3 so do la: ',tong);

         write('Hieu cua 3 so do la: ',hieu);

         Readln;

End.

program ct;

Uses crt;

Var

        a,b,c:integer;

Begin

        clrscr;

        write('Nhap 3 so: '); readln(a,b,c);

        writeln('Tong cua 3 so la: ',a+b+c);

        writeln('Hieu cua 3 so la: ',a-b-c);

        Readln;

End.

#HNgoc

#Chuc_em_hoc_tot