Đọ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.
2 câu trả lời
-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é.
- Nhập dữ liệu : nhập giá trị cho biến a và b
- Xuất dữ liệu : biến c
- Thêm lệnh sau để người sử dụng biết nhập giá trị cho biến a hay b :
+ write('nhap gia trị a : ');
+ write('nhap gia tri b : ');
- Chương trình hoàn chỉnh :
var a, b, c : integer;
begin
write('nhap gia trị a : '); readln(a);
write('nhap gia trị b : '); readln(b);
c := a * b;
write('ket qua = ', c);
readln
end.
