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.
#include <bits/stdc++.h>
using namespace std;
double xa,ya,xb,yb,xc,yc,ab,ac,bc;
int main()
{
cin>>xa>>ya>>xb>>yb>>xc>>yc;
ab=(sqrt((xa-xb)*(xa-xb)+(ya-yb)*(ya-yb)));
ac=(sqrt((xa-xc)*(xa-xc)+(ya-yc)*(ya-yc)));
bc=(sqrt((xb-xc)*(xb-xc)+(yb-yc)*(yb-yc)));
p=(ab+bc+ac)/2;
s=sqrt(p*(p-ab)*(p-ac)*(p-bc));
cout<<"Dien tich la:"<<fixed<<setprecision(2)<<s<<endl;
cout<<"Duong cao ung voi dinh A la:"<<fixed<<setprecision(2)<<2*s/bc<<endl;
cout<<"Duong cao ung voi dinh B la:"<<fixed<<setprecision(2)<<2*s/ac<<endl;
cout<<"Duong cao ung voi dinh C la:"<<fixed<<setprecision(2)<<2*s/ab<<endl;
return 0;
}
Câu 1:
uses crt;
var st:string;
d,i,dem:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
write('Xau sau khi xoa so la: ');
for i:=1 to d do
if not(st[i] in ['0'..'9']) then write(st[i]);
writeln;
dem:=0;
for i:=1 to d do
if st[i]=#32 then inc(dem);
writeln('Xau co ',dem,' dau cach');
writeln('Do dai cua xau la: ',d);
readln;
end.
Câu 2:
uses crt;
const fi='kq.out';
var st1,st2:string;
f1:text;
begin
clrscr;
write('Nhap xau thu 1:'); readln(st1);
write('Nhap xau thu 2:'); readln(st2);
assign(f1,fi); rewrite(f1);
if length(st2)>length(st1) then writeln(f1,st2)
else writeln(f1,st1);
close(f1);
end.
Bài 2:
#include <bits/stdc++.h>;
using namespace std;
int main();
{
long m,n;
cout<<"Nhap m="; cin>>m;
cout<<"Nhap n="; cin>>n;
cout<<m*n-2;
return 0;
}
Program Xau;
Uses crt;
Var St: String;
i: longint;
Begin
Clrscr;
Write('Nhap xau: '); Readln(St);
For i:=1 to length(St) do
St[i] := Upcase(St[i]);
Write('St = ',St);
Readln
End.
viết chương trình nhập vào từ bàn phím xâu ký tự S . tính và đưa ra màn hình số lượng kí tự trog xâu
uses crt;
var st:string;
begin
clrscr;
write('Nhap xau:'); readln(st);
writeln(length(st));
readln;
end.
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
# Nhập chuỗi từ bàn phím
s = input("Nhập chuỗi: ")
# Tính số chữ số xuất hiện trong chuỗi
count = 0
for char in s:
if char.isdigit():
count += 1
# In số chữ số xuất hiện trong chuỗi
print("Số chữ số xuất hiện trong chuỗi là:", count)
program stringManipulation;
var
st1, st2: string;
countN, i: integer;
begin
write('Nhap vao xau ki tu st1: ');
readln(st1);
countN := 0;
for i := 1 to length(st1) do
begin
if (st1[i] = 'N') or (st1[i] = 'n') then
begin
countN := countN + 1;
end;
end;
writeln('So ky tu N va n trong xau st1 la: ', countN);
st2 := '';
for i := 1 to length(st1) do
begin
if (st1[i] >= 'A') and (st1[i] <= 'Z') then
begin
st2 := st2 + st1[i];
end;
end;
writeln('Cac ky tu in hoa trong xau st1 la: ', st2);
write('Xau st1 viet theo chieu nguoc lai la: ');
for i := length(st1) downto 1 do
begin
write(st1[i]);
end;
readln;
end.
st1 = input("Nhập vào xâu kí tự: ")
count_n = 0
st2 = ""
for char in st1:
if char == 'N' or char == 'n':
count_n += 1
if char.isupper():
st2 += char
print("Số lần xuất hiện của kí tự 'N' và 'n' là:", count_n)
print("Xâu kí tự chỉ chứa kí tự in hoa là:", st2)
print("Xâu kí tự đảo ngược là:", st1[::-1])
Program HOC24;
var i,d1,d2: byte;
st1,st2: string[60];
begin
write('Nhap xau st1: '); readln(st1);
//---------------Câu 1-------------------
d1:=0; d2:=0;
for i:=1 to length(st1) do
begin
if st1[i]='A' then d1:=d1+1;
if st1[i]='a' then d2:=d2+1;
end;
writeln('Co ',d1,' ki tu A trong xau');
writeln('Co ',d2,' ki tu a trong xau');
//---------------------- Câu 2 --------------------
st2:='';
for i:=1 to length(st1) do if st1[i] in ['a'..'z'] then st2:=st2+st1[i];
writeln('Xau st2 la: ',st2);
//------------------------------Câu 3--------------------
for i:=1 to length(st1) do st1[i]:=upcase(st1[i]);
write('Xau st1 sau khi in hoa la: ',st1);
//--------------------------------------------------------
readln
end.