MH
0
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.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
22 tháng 12 2019
program tinhp;
uses crt;
var x,n,i: integer;
s: real;
begin
clrscr;
write('Nhap n:'); readln(n);
write('Nhap x:'); readln(x);
s:=sqrt(x);
for i:=1 to n do
s:= sqrt (x+s);
writeln('tong s=',s:6:2);
readln;
end.
14 tháng 1 2022
- Program KTCHK1;
- Program KTC_HK1;
- Uses crt;
- Var a, S: Integer;
- Writeln('Nhap a = ');
- Writeln('S = ' , S);
8 tháng 3 2023
Câu a:
n = int(input("Nhập số nguyên n: "))
S = 0
for i in range(1, n+1):
S += i
print("Tổng S =", S)
Câu b:
n = int(input("Nhập số nguyên n: "))
S = 0
for i in range(1, n, 2):
S += i
print("Tổng S =", S)
Câu c:
def calc_sum(n):
s=0
for i in range(1,n+1):
s += 2*i
return s
n = int(input("Nhập vào số n: "))
print("Tổng S=2+4+6+...2n là:",calc_sum(n))
9 tháng 3 2023
n = int(input("Nhập số nguyên n: "))
S = 0
for i in range(1, n+1):
S += i
print("Tổng S =", S)
Câu b:
n = int(input("Nhập số nguyên n: "))
S = 0
for i in range(1, n, 2):
S += i
print("Tổng S =", S)
Câu c:
def calc_sum(n):
s=0
for i in range(1,n+1):
s += 2*i
return s
n = int(input("Nhập vào số n: "))
print("Tổng S=2+4+6+...2n là:",calc_sum(n))
17 tháng 12 2019
1:
uses crt;
var a,b:integer;
s:real;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
if (a>0) and (b>0) then
begin
s:=(a*a*a+b*b*b)/(sqrt(a+b));
writeln('A=',s:4:2);
end
else writeln('vui long nhap hai so duong');
readln;
end.
2:
uses crt;
var a,b,s:integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
if a mod 5<>0 then
begin
s:=a*b;
writeln('tich cua hai so la: ',s);
end
else writeln('vui long nhap a khong chia het cho 5');
readln;
end.
3: Bạn xem lại đề , Hình như phải là 2+4+6+...+2*n chứ bạn
22 tháng 12 2021
#include <bits/stdc++.h>
using namespace std;
long long s,i,n;
int main()
{
cin>>n;
s=1;
for (i=1; i<=n; i++)
if (i%2==0) s=s+i;
cout<<s;
return 0;
}
LA
0
17 tháng 2 2021
Bài 1:
function canbac2(x:longint):real;
begin
canbac2:=sqrt(x);
end;
Bài 2:
function tong(n:longint):longint;
var s,i:longint;
begin
s:=0;
for i:=1 to n do
s:=s+i;
tong:=s;
end;