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.
thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko
mik gõ r mà mik chắc chắc 100% mật khẩu đó đúng . À mà mik lấy nick em mik vào trang của mik thì nó để là Nick đã bị đổi chủ! !
Nên chạy ảnh thầy cô, tập thể lớp, lời chúc,...
Cao siêu hơn thì làm 1 cái phim ngắn luôn :)))
uses crt;
var s:string;
i,d,dem:integer;
begin
clrscr;
write('Nhap chuoi S:'); readln(s);
d:=length(s);
writeln('Trong chuoi ',s,' co ',d,' ki tu');
writeln('Chuoi dao cua chuoi ',s,' la: ');
for i:=d downto 1 do
write(s[i]:4);
writeln;
dem:=0;
for i:=1 to d do
if s[i] in ['0'..'9'] then inc(dem);
writeln('So chu so trong xau la: ',dem);
readln;
end.
Câu 1 :
a) (a+b)*(a+b)*(d+e)
b) a*x*x+b*x*x+c*x
Câu 2: Mình không hiểu đề lắm? Đặt cái gì cơ?
Câu 3:
Uses crt;
Var S,a,b:real;
Begin
clrscr;
Writeln('Nhap chieu dai a = '); Readln(a);
Writeln('Nhap chieu rong b = '); Readln(b);
S := a*b;
Write('Dien tich hinh chu nhat la ', S );
Readln;
End.
xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal
program doixung;
var
str, reverseStr: string;
i, count, maxWordLength: integer;
words: array of string;
begin
write('Nhập vào một xâu kí tự: ');
readln(str);
reverseStr := '';
for i := length(str) downto 1 do
reverseStr := reverseStr + str[i];
if str = reverseStr then
writeln('Xâu là đối xứng')
else
begin
writeln('Xâu không đối xứng');
writeln('Xâu đảo ngược: ', reverseStr);
end;
count := 0;
maxWordLength := 0;
SetLength(words, 0);
while Length(str) > 0 do
begin
i := Pos(' ', str);
if i = 0 then
i := Length(str) + 1;
if i - 1 > maxWordLength then
maxWordLength := i - 1;
SetLength(words, Length(words) + 1);
words[Length(words) - 1] := Copy(str, 1, i - 1);
Delete(str, 1, i);
Inc(count);
end;
writeln('Số từ trong xâu: ', count);
writeln('Từ dài nhất: ', maxWordLength);
end.
Tên bạn là gì ? Tôi cho bạn xem vài phần mềm , rồi tự tạo nha ! Tôi lười
Tạo chữ ký theo tên online
Cách tạo chữ ký đẹp theo tên của bạn
Trịnh Ngọc Hân cho mình xem cái chữ kí của bn với!!! Viết chữ đẹp chắc chữ kí cũng đẹp ha!!!