viết cương trình in ra màn hình xuất hiện chào các bạn không quá 10 lần
KY
Những câu hỏi liên quan
Viết chương trình in ra màn hình 3 dòng chữ:
- Chào các bạn
- Mình tên là ...
- Mình học lớp ...
#include <bits/stdc++.h>
using namespace std;
int main()
{
cout<<"Chao cac ban"<<endl;
cout<<"Minh ten la:"<<endl;
cout<<"Minh hoc lop:";
return 0;
}
Đúng 0
Bình luận (0)
program XinChao;
uses crt;
begin
Clrscr;
writeln ('Chao cac ban!');
writeln('Minh ten la Nguyen Mai Phuong ');
writeln('Minh hoc lop 8A4');
readln;
end.
đáp án nha
Đúng 0
Bình luận (0)
Viết chương trình nhập một xâu từ bàn phím .Đếm số lần xuất hiện của các kí tự trong xâu và in ra màn hình
uses crt;
var st:string;
a:array[1..255]of string;
i,d,dem,kt,j,dem1:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
a[1]:=st[1];
dem:=1;
for i:=1 to d do
begin
kt:=0;
for j:=1 to dem do
if st[i]=a[j] then kt:=1;
if kt=0 then
begin
inc(dem);
a[dem]:=st[i];
end;
end;
for i:=1 to dem do
begin
dem1:=0;
for j:=1 to d do
if a[i]=st[j] then inc(dem1);
writeln(a[i],' xuat hien ',dem1,' lan');
end;
readln;
end.
Đúng 0
Bình luận (0)
uses crt;
var a:string;
c:char;
i,dem:integer;
begin
clrscr;
readln(a);
readln(c);
dem:=0;
for i:=1 to length(a) do
if a[i]=c then dem:=dem+1;
writeln(dem);
readln;
end.
Đúng 0
Bình luận (0)
Xâu con bạn vừa nhập có hay không xuất hiện trong câu?Xuất hiện bao nhiêu lần?Ở những vị trí nào?
Viết chương trình nhập sâu S không quá 255 kí tự, rồi xuất ra màn hình xâu chữ cái in hoa và chữ cái thường
Program HOC24;
var s: string;
i: byte;
begin
write('Nhap xau S: '); readln(s);
write('Cac chu cai in hoa: ');
for i:=1 to length(s) do if s[i] in ['A'..'Z'] then write(s[i],' ');
writeln;
for i:=1 to length(s) do if s[i] in ['a'..'z'] then write(s[i],' ');
readln
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập vào một xâu S có độ dài không quá 125 ký tự từ bàn phím. Xuất xâu đã nhập. Thực hiện xóa hết các dấu cách có trong xâu S. Xuất xâu S đã xóa các dấu cách ra màn hình
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
writeln('Xau vua nhap la: ',st);
for i:=1 to d do
if st[i]=#32 then delete(st,i,1);
writeln('Xau moi la: ',st);
readln;
end.
Đúng 2
Bình luận (0)
Viết chương trình để có dòng chữ "chào các bạn" chạy trên màn hình
-Từ trái sang phải 10 lần
-Từ trên xuống dưới 20 lần
-Từ góc trái dưới lên góc phải trên của màn hình
câu 1
Viết - chạy - sửa lỗi ( nếu có ) chương trình in ra trên màn hình dòng chữ " lớp 8A chào bạn ! "
câu 2
Viết chương trình ghi và in ra màn hình kết quả tổng 2 số tự nhận a, b nhập vào từ bàn phím
câu 3
Viết chương trình tính s và chu vi hình chữ nhật biết 2 cạnh nhập từ bàn phím . Lưu tệp với tên HCN . Pas
Câu 3:
program cauba;
int chieudai, chieurong, chuvi, dientich :real;
begin
write('Chieu dai la: '); Readln(chieudai);
write('Chieu rong la: '); Readln(chieurong);
chuvi = (chieudai + chieu rong)*2;
dientich= chieudai*chieurong;
writeln('Chu vi la: ',chuvi);
writeln('Dien tich la: ',dientich);
end.
Đúng 0
Bình luận (0)
Caua1:
program caumot;
begin
writeln('lop 8A chao ban!');
end.
Câu 2:
program cauhai;
int a,b,c :real;
begin
write('a='); readln(a);
write('b='); readln(b);
c= a+b;
write('Tong hai so a b la:',c);
end.
Đúng 0
Bình luận (0)
Lập trình nhập vào hai xâu s và x(len(x)<len (s). Kiểm tra và thông báo ra màn hình số lần xuất hiện của x trong s. Nếu không xuất hiện thì thông báo không(Viết bằng ngôn ngữ python)
s = input("Nhập xâu s: ")
x = input("Nhập xâu x: ")
count = 0
for i in range(len(s) - len(x) + 1):
if s[i:i+len(x)] == x:
count += 1
if count == 0:
print("Không xuất hiện")
else:
print("Số lần xuất hiện của x trong s là:", count)
Đúng 3
Bình luận (0)
Viết chương trình nhập vào một xâu S có độ dài không quá 100 ký tự từ bàn phím. Hãy cho biết có bao nhiêu chữ số xuất hiện trong xâu S. Thông báo kết quả ra màn hình. Xuất xâu đã nhập
Chương trình:
program bai_10_chuong_4;
uses crt;
var
s: string[100];
i, dem: integer;
Begin
clrscr;
write('Nhap xau vao:'); readln(s); dem:= 0;
for i:= 1 to length(s) do
if ('0'<=s[i]) and(s[i]<=’9') then dem:=dem+l;
Writeln('Trong xau s co '»dem,' chu so thap phan');
readln;
End.
Đúng 2
Bình luận (0)
uses crt;
var st:string;
i,d,dem:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
writeln('Xau vua nhap la: ',st);
dem:=0;
for i:=1 to d do
if st[i] in ['0'..'9'] then inc(dem);
writeln(dem);
readln;
end.
Đúng 0
Bình luận (0)