Đọc chương trình sau và cho biết chương trình thực hiện những nhập dữ liệu gì và xuất dữ liệu gì? Theo em khi thực hiện chương trình thì phải thêm vào câu lệnh nào được người sử dụng dễ thực hiện.
Var a,b,c: integer;
Begin
Readln(a);
Readln(b);
C:=a*b;
Write(‘ket qua= ‘,c);
readln
End.
-Các em hãy gõ chương trình sau vào Turbo Pascal để chạy và tìm lỗi?
program Tinh_Chu_Vi_Dien_Tich_HV
var a,s,c:longint;
begin
write(‘Nhap vao do dai canh hinh vuong: ’)
read(a);
if a>0 then
begin
c:=4*a;
s:=a*a;
writeln(‘Chu vi hinh vuong co canh dai ’ ,a, ‘la: ’,c);
writeln(‘Dien tich hinh vuong co canh dai ’ ,a, ‘la: ’,s)
end
else
write(Du lieu sai, khong the thuc hien duoc! ’);
readln
end.
Bạn tham khảo nhé.