Những câu hỏi liên quan
Viết chương trình nhập vào một số n. Việc nhập kết thúc khi n=0. Đếm xem có bao nhiêu số được nhập vào. In Dem.
Xem chi tiết
uses crt;
var n,dem:integer;
begin
clrscr;
dem:=0;
repeat
write('Nhap n='); readln(n);
dem:=dem+1;
until n=0;
writeln(dem);
readln;
end.
Đúng 2
Bình luận (0)
Viết chương trình nhập vào nhiều số nguyên từ bàn phím, việc nhập kết thúc khi ta nhập vào số 0 hoặc nhập đủ 10 số. a) Đếm và in ra số các số đã nhập, không tính số 0. (VD: nhập 7, 4, 9, 0 - Đã nhập 3 số) b)Tính và in ra tổng các số lẻ đã nhập2.Viết chương trình nhập vào điểm theo thang điểm 10. Đổi sang thang điểm 4 và in kết quả ra màn hình. Biết từ 8.5 đến 10 thì đổi sang thang điểm 4 là 4. Từ 7 đến dưới 8.5 thì đổi sang thang điểm 4 là 3. Từ 5.5 đến dưới 7 thì đổi sang thang điểm 4 là 2. Từ...
Đọc tiếp
Viết chương trình nhập vào nhiều số nguyên từ bàn phím, việc nhập kết thúc khi ta nhập vào số 0 hoặc nhập đủ 10 số. a) Đếm và in ra số các số đã nhập, không tính số 0. (VD: nhập 7, 4, 9, 0 -> Đã nhập 3 số) b)Tính và in ra tổng các số lẻ đã nhập
2.Viết chương trình nhập vào điểm theo thang điểm 10. Đổi sang thang điểm 4 và in kết quả ra màn hình. Biết từ 8.5 đến 10 thì đổi sang thang điểm 4 là 4. Từ 7 đến dưới 8.5 thì đổi sang thang điểm 4 là 3. Từ 5.5 đến dưới 7 thì đổi sang thang điểm 4 là 2. Từ 4 đến dưới 5.5 thì đổi sang thang điểm 4 là 1. Còn dưới 4 thì đổi sang thang điểm 4 là 0
mọi người code giùm ạ em cám ơn ngôn ngữ c
Bài 1:
#include <bits/stdc++.h>
using namespace std;
long long a[10],n,i,t;
int main()
{
n=0;
do
{
cin>>a[i];
}
while ((a[i]==0) or (n==10));
for (i=1; i<=n; i++) cout<<a[i]<<" ";
cout<<endl;
t=0;
for (i=1; i<=n; i++)
if (a[i]%2!=0) t=t+a[i];
cout<<t;
return 0;
}
Đúng 3
Bình luận (1)
Bài 1: Viết chương trình nhập vào số nguyên dương n (0<n<100) và khởi tạo dãy gồm n số nguyên Ai (-32000<Ai<32000). Đếm và in ra màn hình các số dương có 3 chữ số?Bài 2: Viết chương trình nhập vào một xâu kí tự, đếm xem trong xâu có bao nhiêu kí tự chữ số 1?
Xem chi tiết
Viết chương trình nhập vào 1 xâu, hãy ĐẾM số kí tự số trong xâu. (Pascal )
VD: Nhập s: 123yuo@hg5
In ra:4
Program hotrotinhoc;
var s: string;
t,c,i: byte;
begin
write('Nhap s:'); readln(s);
t:=0;
for i:=1 to length(s) do
if s[i] in ['1'..'9'] then
begin
val(s[i],c);
t:=t+c;
end;
write(t);
readln
end.
Thu gọn
Đúng 0
Bình luận (1)
Câu 1: viết chương trình nhập vào N số tự nhiên đầu tiên,đếm xem có bao nhiêu số là số chẵn Câu 2: Viết chương trình nhập vào N số tự nhiên tính tổng các số chia hết cho 3 Em cần gấp lắm ạ:(
1:
#include <bits/stdc++.h>
using namespace std;
long long dem,i,n,x;
int main()
{
cin>>n;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%2==0) dem++;
}
cout<<dem;
return 0;
}
Câu 2:
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%3==0) t+=x;
}
cout<<t;
return 0;
}
Đúng 0
Bình luận (0)
Bài 1: Viết chương trình Nhập vào một dãy số gồm n phần tử, đếm và in ra kết quả trong dãy có bao nhiêu số chẵn. Bài 2: Viết chương trình nhập vào một xâu ký tự in ra màn hình độ dài của xâu.
Bài 2:
#include <bits/stdc++.h>
using namespace std;
string st;
int d;
int main()
{
getline(cin,st);
d=st.length();
cout<<d;
return 0;
}
Đúng 0
Bình luận (0)
Bài 1:
Var so,i,n,dem:integer;
Begin
Write('Nhap so luong so n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i);readln(so);
If so mod 2 = 0 then dem:=dem+1;
End;
Write('Co ',dem,' so chan');
Readln;
End.
Bài 2:
Var st:string;
Begin
Write('Nhap vao xau ki tu ');readln(st);
Write(' Xau vua nhap co do dai la ',length(st));
Readln;
End.
Đúng 0
Bình luận (0)
Viết chương trình cho phép nhập vào nhiều số nguyên cho đến khi gặp số 0 thì kết thúc. Đếm xem trong các số vừa nhập có bao nhiêu số âm, bao nhiêu số dương. bằng Python
so_am = 0
so_duong = 0
while True:
n = int(input("Nhap vao mot so nguyen: "))
if n == 0:
break
elif n < 0:
so_am += 1
else:
so_duong += 1
print("So am: ", so_am)
print("So duong: ", so_duong)
Đúng 1
Bình luận (0)
Viết chương trình nhập vào xâu S.a, Xoá hết kí tự là chữ trong xâu.b, đếm xem xâu có bao nhiêu nguyên âm. c, đếm số lần xuất hiện của kí tự k đc nhập bào từ bàn phím
uses crt;
var s:string;
i,d:integer;
begin
clrscr;
write('Nhap xau S:'); readln(s);
d:=length(s);
for i:=1 to d do
if (s[i] in ['a'..'z']) or (s[i] in ['A'..'Z']) then delete(s,i,1);
writeln('Xau sau khi xoa het ki tu chu la: ',s);
readln;
end.
Đúng 1
Bình luận (0)
9 tháng 5 2022 lúc 21:39
Viết chương trình nhập vào các số nguyên cho đến khi nào gặp số 0 thì kết thúc. Tính tổng các số lẻ được nhập vào.
refer
program dem;
uses crt;
var n,i,j,S: integer;
a:array[1..100] of integer;
begin
i:=0;
S:=0;
while(readln(n)) do
begin
if(n:=0) then break;
i:=i+1;
a[i]:=n;
end;
for j:=1 to i do
begin
if(a[j] mod 2 <> 0) then S:=S+a[j];
end;
write(‘Tong cua cac so le la: ‘,S);
readln;
Đúng 1
Bình luận (0)