2 câu trả lời
program tinh;
uses crt;
var x, y: real;
begin
clrscr;
write('nhap gia tri x:');
readln(x);
y :=( x + 1)*2;
writeln('gia tri cua bieu thuc la:',y);
readln
end.
uses crt;
var x:longint;
begin
clrscr;
write('Nhap vao x = ');readln(x);
writeln('Gia tri cua bieu thuc (x+1)2 = ',(x+1)*2);
readln;
end.
