Hà Minh Châu
Hỏi từ APP VIETJACK
Câu 2. Sửa lỗi cú pháp cho chương trình trên nếu có. (1 điểm)
Program KTC HK1;
Ues Crt;
Var
a, S: Interger;
Begin
Writeln(‘Nhap a = ’)
Readln(a);
S:= sqrt(a);
Writeln(‘S = ’ S);
End.
Program KTC HK1;
Ues Crt;
Var
a, S: Interger;
Begin
Writeln(‘Nhap a = ’)
Readln(a);
S:= sqrt(a);
Writeln(‘S = ’ S);
End.
Quảng cáo
3 câu trả lời 2274
3 năm trước
- Tên chương trình phải viết liền
- Vì nên S không thể là kiểu dữ liệu số nguyên "interger" --> phải kiểu số thực " real"
- Lệnh Writeln : giữa xâu và biến phải có dấu , ngăn cách
=>Sửa chương trình :
Program KTC_HK1;
Uses crt;
Var a, S : real;
Begin
Clrscr;
Writeln('Nhap a = ');
Readln(a);
S := sqrt(a);
Writeln('S = ', S);
End.
3 năm trước
Sửa:
Program KTC_HK1;
Uses crt;
Var a,S:integer;
Begin
Writeln('Nhap a =');
Readln(a);
S:=sqrt(a);
Writeln('S=',S);
End.
3 năm trước
* Sửa chương trình :
Program KTC_HK1;
Uses crt;
Var a, S : real;
Begin
Clrscr;
Writeln('Nhap a = ');
Readln(a);
S := sqrt(a);
Writeln('S = ', S);
End.
Quảng cáo
Câu hỏi hot cùng chủ đề
Gửi báo cáo thành công!