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.

const fi='mk.inp';

fo='mk.out';

var f1,f2:text;

st:string;

i,d,t,x,y:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,st);

d:=length(st);

t:=0;

for i:=1 to d do  

begin

val(st[i],x,y);

t:=t+x;

end;

writeln(f2,t);

close(f1);

close(f2);

end.

30 tháng 3 2021

Code (C++): https://gist.github.com/minotour4869/f0228185c609ce10e5e7e64ebdb52f84

Chúc bạn học tốt nha 😉.

pascal nha mọi ngườiBài 1 : MẬT KHẨU.Cu Tí thường xuyên tham gia thi lập trình trên mạng. Vì đạt được thành tích cao nênTí được gửi tặng một phần mềm diệt virus. Nhà sản xuất phần mềm cung cấp cho Tí mộtmã số là một dãy gồm các bộ ba chữ số ngăn cách nhau bởi dấu chấm và có chiều dài khôngquá 255 (kể cả chữ số và dấu chấm). Để cài đặt được phần mềm, Tí phải nhập vào mật khẩucủa phần...
Đọc tiếp

pascal nha mọi người

Bài 1 : MẬT KHẨU.
Cu Tí thường xuyên tham gia thi lập trình trên mạng. Vì đạt được thành tích cao nên
Tí được gửi tặng một phần mềm diệt virus. Nhà sản xuất phần mềm cung cấp cho Tí một
mã số là một dãy gồm các bộ ba chữ số ngăn cách nhau bởi dấu chấm và có chiều dài không
quá 255 (kể cả chữ số và dấu chấm). Để cài đặt được phần mềm, Tí phải nhập vào mật khẩu
của phần mềm. Mật khẩu là một số nguyên dương M được tạo ra bằng cách tính tổng giá trị
các bộ ba chữ số trong dãy mã số, các bộ ba này được đọc từ phải sang trái.
-          Yêu cầu: Cho biết mã số của phần mềm, hãy tìm mật khẩu của phần mềm đó.
-          Dữ liệu vào: Cho từ tệp văn bản có tên MATKHAU.INPgồm một dòng chứa
xâu ký tự S (độ dài xâu không quá 255 ký tự) là mã số của phần mềm.
-          Kết quả: Ghi ra tệp văn bản có tên MATKHAU.OUTgồm một số nguyên là mật
khẩu tìm được.

0

#include <bits/stdc++.h>

using namespace std;

long long n,i,j,dem;

bool kt;

int main()

{

freopen("dnto.inp","r",stdin);

freopen("dnto.out","w",stdout);

cin>>n;

for (i=2; i<=n; i++)

{

kt=true;

for (j=2; j*j<=i; j++)

if (i%j==0) kt=false;

if (kt==true) dem++;

}

cout<<dem;

return 0;

}

const fi='tong.inp';

fo='tong.out';

var f1,f2:text;

a:array[1..100]of integer;

n,i,t:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do 

  read(f1,a[i]);

t:=0;

for i:=1 to n do 

  t:=t+a[i];

writeln(f2,t);

close(f1);

close(f2);

end.

Cho tệp văn bản DAYSO.INP có cấu trúc: + Dòng 1: Ghi số nguyên dương N  (0<N<=100) + Dòng 2: Ghi dãy gồm n số nguyên Ai (-30000<=Ai<=30000). Yêu cầu: Viết chương trình đọc dữ liệu từ tệp trên và thực hiện các công việc sau:a) Tính tổng các số ở dòng 2, ghi kết quả vào tệp TONG.OUT theo cấu trúc:+ Dòng 1: Ghi số nguyên S là tổng tìm được b) Tính tổng các số dương ở dòng 2, ghi kết quả vào tệp TD.OUT theo cấu trúc:+ Dòng...
Đọc tiếp

Cho tệp văn bản DAYSO.INP có cấu trúc:

+ Dòng 1: Ghi số nguyên dương N  (0<N<=100)

+ Dòng 2: Ghi dãy gồm n số nguyên Ai (-30000<=Ai<=30000).

Yêu cầu: Viết chương trình đọc dữ liệu từ tệp trên và thực hiện các công việc sau:

a) Tính tổng các số ở dòng 2, ghi kết quả vào tệp TONG.OUT theo cấu trúc:

+ Dòng 1: Ghi số nguyên S là tổng tìm được

b) Tính tổng các số dương ở dòng 2, ghi kết quả vào tệp TD.OUT theo cấu trúc:

+ Dòng 1: Ghi số nguyên S là tổng các số dương tìm được

c) Đếm số lượng các số chẵn ở dòng 2, ghi kết quả vào tệp SOCHAN.OUT theo cấu trúc:

+ Dòng 1: Ghi số nguyên k là số lượng số chẵn

+ Dòng 2: Ghi các số chẵn tìm được, các số ghi cách nhau 1 dấu cách trống.

d) Đếm số lượng các số âm chẵn ở dòng 2, ghi kết quả vào tệp SOAMCHAN.OUT theo cấu trúc:

+ Dòng 1: Ghi số nguyên k là số lượng số âm chẵn

+ Dòng 2: Ghi các số âm chẵn tìm được, các số ghi cách nhau 1 dấu cách trống.

e) Sắp xếp các số ở dòng 2 để được dãy không giảm, ghi kết quả vào tệp SAPXEP.OUT theo cấu trúc:

+ Dòng 1: Ghi dãy số đã được sắp xếp, các số ghi cách nhau 1 dấu cách trống.

f) Đếm số lượng các số nguyên tố ở dòng 2, ghi kết quả vào tệp NTO.OUT theo cấu trúc:

+ Dòng 1: Ghi số nguyên k là số lượng số nguyên tố

+ Dòng 2: Ghi các số nguyên tố tìm được, các số ghi cách nhau 1 dấu cách trống.

HƠI DÀI NHMA MONG MẤY BẠN GIÚP CHỨ MÌNH CHỊU R

0

mình ghi dư cái số 4 bên phần BAI7.INP nha mn

 

bằng python nha mọi người

 

#include <bits/stdc++.h>

using namespace std;

long long a[1000],n,i;

int main()

{

freopen("so.inp","r",stdin);

freopen("so.out","w",stdout);

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++)

if (a[i]%2==0) cout<<a[i]<<" ";

return 0;

}

#include <bits/stdc++.h>

using namespace std;

long long n,i;

bool kt;

int main()

{

freopen("checknto.inp","r",stdin);

freopen("checknto.out","w",stdout);

cin>>n;

kt=true;

for (i=2; i*i<=n; i++)

if (n%i==0) kt=false;

if (kt==true && n>1) cout<<"YES";

else cout<<"NO";

return 0;

}

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,j;

bool kt;

int main()

{

freopen("nguyento.inp","r",stdin);

freopen("nguyento.out","w",stdout);

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++)

if (a[i]>1) 

{

kt=true;

for (j=2; j*j<=a[i]; j++)

if (a[i]%j==0) kt=false;

if (kt==true) cout<<a[i]<<" ";

}

return 0;

}