BÀI 2 PROGRAM CHEN_SO_VAO_MANG;USES CRT;0.5VAR N, I

DE THI HOC SINH GIOI TIN CO DAP AN

1.5

t:=sqrt(t+sqrt(i));

Writeln('Gia tri bieu thuc la: ',t:10:6);

0.5

readln;

End.

Program xoa_xau;

Uses Crt;

Var st: string;

0.5

ch: char;

i: Integer;

Begin

CLRSCR;

Write('Nhap xau: ');readln(st);

Write('nhap ki tu can xoa: ');readln(ch);