Viết chương trình nhập vào 3 số nguyên A B C từ bàn phím tính và in ra màn hình a) X = a+b+c b) Y= (a+b)² C) chạy chương trình và nhập giá trị cho A là 10.5 Nhận xét kết quả

uses crt;

var a,b,c,X,Y,A:integer;

begin

clrscr;

write('nhap a:');readln(a);

write('nhap b:');readln(b);

write('nhap c:');readln(c);

X:=a+b+c;

Y:=(a+b)*(a+b);

writeln(X);

writeln(Y);

readln;

end.

- Nhận xét kết quả :

+ Kết quả chương trình bị lỗi không chạy được

+ Vì A được khai báo là số nguyên, 10.5 là số thực

- Viết chương trình :

uses crt;

var A, B, C : integer;

begin

clrscr;

write('Nhap ba so A, B, C : '); readln(A, B, C);

writeln('X = ', A + B +C);

writeln('Y = ', sqr(A + B));

readln

end.