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
14 tháng 2 2017
bạn chỉ cần tải zing mp3 là được mà, thử chưa?
hay là máy không đủ dung lượng để tải?
mình gợi ý thôi nha
NN
1
19 tháng 8 2023
- Bạn vào shop.olm.vn
- Đăng nhập tài khoản của bạn vào rồi thực hiện để đổi quà chứ không thể chuyển sang tiền mặt
14 tháng 3 2022
uses crt;
var st:string;
d,i,t,x,y,a,b:integer;
begin
clrscr;
readln(st);
d:=length(st);
for i:=1 to d do write(st[i]:4);
writeln;
t:=0;
for i:=1 to d do
begin
val(st[i],x,y);
t:=t+x;
end;
writeln(t);
val(st[d],a,b);
if (a mod 2=0) then write(1)
else write(-1);
readln;
end.
13 tháng 3 2022
#include <bits/stdc++.h>
using namespace std;
long long a[1000],i,n,t,dem,t1;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
t=0;
for (i=1; i<=n; i++) if (a[i]%2==0) t+=a[i];
cout<<t<<endl;
t1=0;
dem1=0;
for (i=1; i<=n; i++)
if (a[i]<0)
{
cout<<a[i]<<" ";
t1+=a[i];
dem1++;
}
cout<<endl;
cout<<fixed<<setprecision(1)<<(t1*1.0)/(dem1*1.0);
return 0;
}
13 tháng 3 2022
#include <bits/stdc++.h>
using namespace std;
long long a,b;
//chuongtrinhcon
long long gcd(long long a,long long b)
{
if (b==0) return(a);
return gcd(b,a%b);
}
//chuongtrinhchinh
int main()
{
cin>>a>>b;
cout<<max(a,b)<<endl;
cout<<gcd(a,b)<<endl;
if ((a>0 && b>0) or (a<0 && b<0)) cout<<a/gcd(a,b)<<" "<<b/gcd(a,b);
else cout<<"-"<<-a/gcd(-a,b)<<" "<<b/gcd(-a,b);
return 0;
}
8 tháng 2 2022
4.2:
program là khai báo tên chương trình
uses là dùng để khai báo thư viện
crt là một thư viện thường dùng trong pascal
var được dùng để khai báo biến
integer là kiểu dữ liệu
begin là bắt đầu
clrscr là xóa màn hình
writeln là xuất
readln(a) là nhập vào
tong:=a+b có nghĩa là phép gán biến tong cho a+b;
writeln('-Tong a+b=',tong) là xuất kết quả của biến tong
readln có nghĩa là lệnh chờ
end là kết thúc
8 tháng 2 2022
4.2:
program là khai báo tên chương trình
uses là dùng để khai báo thư viện
crt là một thư viện thường dùng trong pascal
var được dùng để khai báo biến
integer là kiểu dữ liệu
begin là bắt đầu
clrscr là xóa màn hình
writeln là xuất
readln(a) là nhập vào
tong:=a+b có nghĩa là phép gán biến tong cho a+b;
writeln('-Tong a+b=',tong) là xuất kết quả của biến tong
readln có nghĩa là lệnh chờ
end là kết thúc
đã làm là đc
???