Tuyển Cộng tác viên Hoc24 nhiệm kì 26 tại đây: https://forms.gle/dK3zGK3LHFrgvTkJ6
Trong hệ xương của con người, xương đùi là dài nhất, xương cẳng chân dài nhì.
Trong quả tìm nguời có mấy vẫn lớn. Các van này ở bộ phận nào trong trái tim . Công dụng của các vẫn là gì
Lập trình C++ cho một dãy con gồm có n phần tử được nhập ngẫu nhiên từ bàn phím . In ra màn hình dãy con tăng liên tiếp dài nhất trong dãy vừa nhập
Viết chương trình nhập vào 2 số thực a và b là độ dài hai cạnh của một hình chữ nhật, in ra màn hình cạnh nào là chiều dài và cạnh nào là chiều rộng, chẳng hạn “Chiều dài là a, chiều rộng là b” hoặc “Chiều dài là b, chiều rộng là a”.
Nhập 1 xâu kí tự.Kiểm tra tính đối xứng của xâu đó.Nếu xâu không đối xứng thì đảo xâu.hiển thị ra cho biết có bao nhiêu từ.từ nào dài nhất. Giúp mình với mình cần gấp
) Trong chương trình tính diện tích hình chữ nhật, giả sử các đại lượng được đặt tên tương ứng là: a,b (độ dài các cạnh); S (diện tích). Khai báo nào sau đây là phù hợp nhất?
A. Var a,b,S:real; B. Var a,b:real; S:integer;
C. Var a,b:integer; S:real; D. Var a,b,S:integer;
Viết chương trình nhập vào 1 dãy số, có chiều dài là N với N được nhập từ bàn phím
a) Tính tổng của các phần tử trong dãy số
b) Tìm giá trị lớn nhất của dãy
c) Tìm giá trị nhỏ nhất của dãy
d) Tính tổng các phần tử chẵn trong dãy
e) Tính tổng các phần tử lẻ trong dãy
Theo nguyên tắc quản lý tệp và thư mục của hệ điều hành Windows, phát biểu nào sau đây không đúng?
A. Trong một file có chứa các file và thư mục con khác
B. Trong một file có thể không chứa thông tin
C. Trong một thư mục có thể chứa các file và thư mục con khác
D. Hệ điều hành quản lý tệp và thư mục dạng cây thư mục
Trong phần mềm Anatomy, các cơ quan trong hệ tiêu hoá được chia thành những phần nào? Nêu chức năng chính của hệ tiêu hoá?
Em hãy viết chương trình cho biết số từ của đoạn dài nhất liên tiếp các từ
có cùng độ dài của một đoạn văn bản cho trước.
uses crt;
var s:string; a:array[1..1000]of longint;
i,t,n,max,j:longint;
begin
clrscr;
write('s=');
readln(s);
n:=length(s);
t:=1;
For i:=1 to n do
If(s[i]<>' ')or(i=1)then
a[t]:=a[t]+1 else inc(t);
for i:=1 to t do
begin
j:=i;
while a[j]=a[i] do inc(j);
If j-i>max then max:=j-i;
end;
writeln(max);
readln
end.
đây là bài cô mk chữa mà mk chưa hiểu lắm giải nghĩa giúp mk với ạ
