Câu 1: Viết chương trình nhập vào 2 số nguyên x và y. tính z = x - y Câu 2: Viết Chương trình tính nhập vào chiều dài cạnh a của hình vuông. Tính chu vi và diện tích hình vuông đó.
2 câu trả lời
Câu 1:
Program cau1;
Uses crt;
Var x,y:real;
Begin
Clrscr;
Write('Nhap lan luot x va y:');
Readln(x,y);
Writeln('z=',x-y);
Readln
End.
Câu 2:
Program cau2;
Uses crt;
Var a:real;
Begin
Clrscr;
Write('Chieu dai 1 canh:');
Readln(a);
Writeln('Chu vi hinh vuong:',a*4);
Writeln('Dien tich hinh vuong:',a*a);
Readln
End.
program solonhat
uses crt;
var x,y: real
begin
clrscr
write( nhap so x');readln(x);
write( nhap so y');readln(x)
if x>y then write ( so lon nhat la' ,x) else write (so lon nhat la' ,y);
end
câu 2
uses crt;
var a,s,c:real
begin
clrscr;
write(‘nhap canh:’);
readln(a);
c:=a*4;
s:=a*a;
write(‘chu vi và diện tích hình vuông là: ‘,p,’ và ‘,s);
readln;
end.