Question

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.

Answer 1

KTC_HK1;

S: real;

Writeln('Nhap a='); 

Answer 2

- Program KTCHK1;

- Program KTC_HK1;

- Uses crt;

- Var a, S: Integer;

- Writeln('Nhap a = ');

- Writeln('S = ' , S);

Answer 3

Đây là bài hoàn chỉnh, em tự dò lại từng câu lệnh nhé!

Program KTC_HK1;

Uses crt;

begin

writeln('Nhap a = ');readln(a);

s:=sqrt(a);

writeln('s = ',s);

readln;

end.