Cho 1 dãy số có tối đa là 200 phần tử thuộc kiểu số nguyên ,hãy tìm tổng các số lẻ của n phần tử được nhập từ bàn phím.Tính tích các phần tử có giá trị là số chẵn in kết quả ra màn hình
K
Khách
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.
ML
9 tháng 4 2023
Program HOC24;
var i,d1,d2: byte;
s: string;
begin
write('Nhap xau: '); readln(s);
d1:=0; d2:=0;
for i:=1 to length(s) do
begin
if s[i] in ['0'..'9'] then d1:=d1+1;
if s[i] in ['A'..'z'] then d2:=d2+1;
end;
writeln('So ky tu so: ',d1);
write('So ky tu chu cai: ',d2);
readln
end.
TD
1
9 tháng 4 2023
Ở đây, bạn có thể sử dụng vòng for lặp để tình tổng:
#include <iostream>
using namespace std;
int main()
{
int temporary=0;
for(int i=1;i<=10;i++){
temp+=i;
}
cout<<temporary;
return 0;
}
tuy nhiên, có cách khác dễ hơn là tính theo công thức;
#include <iostream>
using namespace std;
int main()
{
int temporary=(10/2)*(10+1);
cout<<temporary;
return 0;
}
(Code được viết theo ngôn ngữ c++)
program BaiTap;
var
arr: array[1..200] of integer;
n, i, sumOfOdd, productOfEven: integer;
begin
writeln('Nhap so phan tu: ');
readln(n);
sumOfOdd := 0;
productOfEven := 1;
for i := 1 to n do
begin
writeln('Nhap phan tu thu ', i, ': ');
readln(arr[i]);
if arr[i] mod 2 = 1 then
sumOfOdd := sumOfOdd + arr[i]
else if arr[i] mod 2 = 0 then
productOfEven := productOfEven * arr[i];
end;
writeln('Tong cac so le: ', sumOfOdd);
writeln('Tich cac so chan: ', productOfEven);
readln;
end.