.Thao tác nào không phải là định dạng văn bản?
Thay đổi kiểu chữ thành chữ nghiêng.
Chọn chữ màu xanh.
Căn giữa đoạn văn bản.
Thêm hình ảnh vào văn bản
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
KV
25 tháng 3 2022
var st:string;
i,dem:integer;
begin
write('Nhap xau ki tu: ');readln(st);
for i:=1 to length(st) do
if st[i]=' ' then dem:=dem+1;
write('so ki tu la dau cach la ',dem);
readln;
end.
TN
1
25 tháng 3 2022
var a:array [1..100] of integer;
i,n,x : byte;
min:integer;
begin
write('Dãy có số phần tử là : '); readln(N);
for i:=1 to n do begin
write('A[',i,'] = ');
readln(A[i]);
end;
Min : = A[1];
for i:=2 to n do if A[i] < min then begin
min:= A[i];
x:=i;
end;
write('Phần tử bé nhất trong dãy là : A[',x,']');
readln
end.
25 tháng 3 2022
chương trình j vậy, pascal hay python
Thêm hình ảnh vào văn bản
Thêm hình ảnh vào văn bản