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.

27 tháng 12 2016

Bước 1. Nhập N

Bước 2. \(i\leftarrow0\) , \(S\leftarrow0\)

Bước 3. \(i\leftarrow i+1\)

Bước 3. 3.1 Nếu \(i>N\) thì kết thúc thuật toán và đưa ra kết quả.

3.2 \(S\leftarrow S+i^2\) rồi quay lại bước 3

6 tháng 4 2017

t:=0;

{ tổng ban đầu bằng 0 }

for i:=1 to n do t:=t+sqr(i);

{ duyệt từ i:=1 tới N, tổng:=tổng+bình phương của i }

write(t);

{ in ra màn hình tổng dãy số }

12 tháng 10 2020

a)

Bước 1: Nhập a,b

Bước 2: Nếu b=0 thì viết phương trình có vô số nghiệm

Không thì viết phương trình vô nghiệm

Bước 3: Nếu a=0 thì quay lại bước 2

Không thì viết phương trình có nghiệm là x=-b/a

Bước 4: Kết thúc

b)

Bước 1: Nhập a,b,c

Bước 2: \(\Delta=b^2-4ac\)

Bước 3: Nếu \(\Delta>0\) thì viết phương trình có hai nghiệm phân biệt là: \(\frac{\left(-b-\sqrt{\Delta}\right)}{2\cdot a}\)\(\frac{-b+\sqrt{\Delta}}{2\cdot a}\)

Bước 4: Nếu \(\Delta=0\) thì viết phương trình có nghiệm kép là: \(-\frac{b}{2\cdot a}\)

Bước 5: Nếu \(\Delta< 0\) thì viết phương trình vô nghiệm

Bước 6: Kết thúc

20 tháng 9 2019

s:=1;

for i:=1 to y do s:=s*x;

8 tháng 10 2020

Program HOC24;

var n,i,t: longint;

begin

write('Nhap N : '); readln(n);

t:=0;

For i:=1 to n-1 do if n mod i=0 then t:=t+i;

if t<=n then write('YES') else write('NO');

readln

end.

25 tháng 12 2019

Đang bận thi học kỳ nên không có làm được.

Btw câu 9,10 m có thể search gg :))

Không cần viết chương trình đâu chứ ha :3

25 tháng 12 2019

Câu 9 , 10 thì t search ra rồi =)) còn chờ mấy câu kia thoii

22 tháng 12 2019

uses crt;
var n,s:integer;
{--------------------chuong-trinh-con-nhap---------------------------}
procedure nhap(var a:integer);
begin
write('n='); readln(a);
end;
{-------------------chuong-trinh-con-tinh-tong-cac-chu-so-trong-1-so---------------------}
procedure tong(var x:integer);
var i,d,t,b,c,e:integer;
st:string;
begin
str(x,st);
t:=0;
d:=length(st);
for i:=1 to d do
begin
val(st[i],b,c);
t:=t+b;
end;
if t<10 then writeln(t)
else tong(t);
end;
{---------------------chuong-trinh-chinh------------------------}
begin
clrscr;
nhap(n);
tong(n);
readln;
end.

21 tháng 10 2023

#include<bits/stdc++.h>
using namespace std;
#define ll long long

int main(){
    ios_base::sync_with_stdio(0);cin.tie(0);
    string s;cin>>s;
    ll t;
    while(1){
        t=0;
        for(ll i=0;i<s.size();i++)t+=s[i]-'0';
        s=to_string(t);
        if(s.size()==1)return cout<<s,0;
    }
}

5 tháng 10 2019

Bài 1: 25710=10116

Giải thích: 257 : 16 = 16(dư 1)

16 chia 16=1(dư 0).

tương tự:

32410=14416; 27910=11716

Bài 2: 100100102=9216

1001102=2616

110010102=CA16

11000002=6016

110011102=CE16