Bạn Nam đã tạo chương trình như ở Hình 5 để đưa ra lời chào một bạn có tên được nhập từ bàn phím. Em hãy kiểm tra, phát hiện và sửa lỗi của chương trình (nếu có).
Để so sánh hai số a, b được nhập từ bàn phím, một bạn đã tạo chương trình ở Hình 1. Khi nháy chuột vào nút lệnh chương trình không hoạt động. Bạn đã phát hiện được lỗi và chỉnh sửa thành chương trình ở Hình 2. Khi thực hiện chương trình ở Hình 2 và nhập giá trị a, b đều là 5, chương trình đưa ra kết quả sai (xem Hình 3).
Hãy thảo luận với bạn và cho biết:
- Tại sao chương trình ở Hình 1 không hoạt động?
- Tại sao chương trình ở Hình 2 đưa ra kết quả sai khi nhập cặp số a, b là (5;5)?
Chương trình 1 có lỗi cú pháp, câu lệnh 2, 3 không khớp nối với câu lệnh 1, 4.
Chương trình 2 có lỗi logic, a = b thuộc trường hợp a > b sai nên chương trình đưa ra thông báo sai khi nhập hai số a, b bằng nhau.
Tạo chương trình ở Hình 7. Thực hiện kiểm thử, gỡ lỗi để chương trình đưa ra đúng tổng của 10 số được nhập từ bàn phím.
- Học sinh tự thực hiện tạo chương trình như sau và tiến hành kiểm thử.
- Gỡ lỗi: Chuyển lệnh gán giá trị ban đầu S = 0 ra khỏi điều kiện lặp.
Hình 7 là chương trình một bạn đã tạo với mục đích tính và thông báo tổng của 10 số được nhập từ bàn phím. Theo em, khi thực hiện, chương trình này có đưa ra kết quả như bạn mong muốn hay không? Tại sao?
Theo em khi thực hiện chương trình này không ra kết quả như mong muốn vì khi khởi tạo giá trị ban đầu cho biến S là 0 trong điều kiện lặp khiến cho giá trị của S trở lại thành 0 sau mỗi lần lặp. Điều này dẫn đến kết quả sai.
câu 1
Viết - chạy - sửa lỗi ( nếu có ) chương trình in ra trên màn hình dòng chữ " lớp 8A chào bạn ! "
câu 2
Viết chương trình ghi và in ra màn hình kết quả tổng 2 số tự nhận a, b nhập vào từ bàn phím
câu 3
Viết chương trình tính s và chu vi hình chữ nhật biết 2 cạnh nhập từ bàn phím . Lưu tệp với tên HCN . Pas
Câu 3:
program cauba;
int chieudai, chieurong, chuvi, dientich :real;
begin
write('Chieu dai la: '); Readln(chieudai);
write('Chieu rong la: '); Readln(chieurong);
chuvi = (chieudai + chieu rong)*2;
dientich= chieudai*chieurong;
writeln('Chu vi la: ',chuvi);
writeln('Dien tich la: ',dientich);
end.
Caua1:
program caumot;
begin
writeln('lop 8A chao ban!');
end.
Câu 2:
program cauhai;
int a,b,c :real;
begin
write('a='); readln(a);
write('b='); readln(b);
c= a+b;
write('Tong hai so a b la:',c);
end.
Khởi động phần mềm Turbo Pascal rồi viết chương trình nhận biết một số tự nhiên N được nhập vào từ bàn phím có phải số nguyên tố hay không? *Yêu cầu: 1) viết chương trình như trên 2) em hãy dịch và sửa lỗi chương trình(nếu có)
uses crt;
var i,n,kt:integer;
begin
clrscr;
readln(n);
kt:=0;
for i=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if (kt=0) and (n>1) then write('phai')
else write('Khong phai');
readln;
end.
Var i,n,souoc:integer;
Begin
While n <= 1 do
Begin
Write('Nhap n = ');readln(n);
End;
For i:=1 to n do
If n mod i = 0 then souoc:=souoc+1;
If souoc = 2 then write(n,' la so nguyen to')
Else write(n,' khong la so nguyen to');
Readln;
End.
Tạo chương trình Scratch để nhập hai số m, n từ bàn phím, thực hiện hoán đổi giá trị của hai biến và thông báo giá trị của biến m, n sau khi đã hoán đổi.
Ví dụ, sau khi nhập m = 23, n = 45, chương trình đưa ra kết quả ra màn hình như ở Hình 6.
Sử dụng cấu trúc lặp while … do viết chương trình in ra câu chào bạn (tên của học sinh được nhập từ bàn phím). Sau khi nhập tên học sinh chương trình có yêu cầu học sinh tiếp tục nhập nũa hay không (Chọn Y để tiếp tục, chọn N để kết thúc).
Ví dụ:
- Moi ban nhap ten: Hoa
- Chao Hoa
- Ban co nhap tiêp hay khong (Y/N): Y
- Moi bạn nhap ten: Hoang
- Chao Hoang
- Ban co nhap tiêp hay khong (Y/N): No
- Chuc ban luon vui ve….
Em hãy thực hành kiểm thử, gỡ lỗi cho các chương trình em đã tạo ở các Bài 12, 13, 14. Trao đổi với bạn về những lỗi đã được em phát hiện, sửa chữa.
giúp em với sáng mai em thi rồi..
1.viết chương trình nhập vào một xâu kí tự từ bàn phím. in ra màn hình xâu kí tự sau khi đã thay các từ "nang" thành "mua".
2. viết chương trình vào một xâu kí tự từ bàn phím .kiểm tra xem xâu đó có phải là xâu palindrom không? ( Xâu palindrom là xâu khi viết từ trái qua phải cũng giống như từ phải qua trái, VD: Xâu 'ABBA' là một xâu palindrom).
giúp em với ạ em rất cần gấp
Bài 1:
uses crt;
var S:String;
vt:integer;
begin
clrscr;
Write(‘Nhap 1 xau:’); Readln(S);
While pos(‘nang’,s)>0 do
Begin
Vt:= pos(‘nang’,s);
Delete(s,vt,4);
Insert(‘mua’,s ,vt);
End;
Writeln(‘Xau sau khi thay the ’,s);
Readln;
End.
Bài 2:
uses crt;
var st:string;
d,i,kt:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
kt:=0;
for i:=1 to d do
if st[i]<>st[d-i+1] then kt:=1;
if kt=0 then writeln(st,' la xau doi xung')
else writeln(st,' khong la xau doi xung');
readln;
end.
Viết chương trình nhập từ bàn phím 3 số thực a, b, c. Kiểm tra nếu a, b, c có là độ dài 3 cạnh của một tam giác cân thì đưa ra thông điệp "Ba số đã nhập là độ dài 3 cạnh của một tam giác cân". Giúp em với ạ :((
#include <bits/stdc++.h>
using namespace std;
int main() {
double a, b, c;
cin >> a >> b >> c;
if(a==b)
{if (b!=c) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac can";}
if(b==c) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac deu";}}
if(b==c)
{if(a!=b) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac can";}}
if(a==c)
{if(a!=b) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac can";}}
if(a!=b)
{if(b!=c) {cout << "Ba so da nhap khong la do dai ba canh cua mot tam giac can";}}
return 0;
}
Chúc bn học tốt! (Bonus thêm trường hợp không là độ dài tam giác cân và là độ dài của tam giác đều nha!)