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.
uses crt;
var t:real;
begin
t=trunc(exp((63*ln(2))));
writeln('So dong tien la : ',t);
readln;
end.
uses crt;
var t:real;
begin
t=trunc(exp((63*ln(2))));
writeln('So dong tien la : ',t);
readln;
end.
uses crt;
var t,s:qword;
i:integer;
begin
clrscr;
t:=1;
s:=1;
for i:=2 to 64 do
begin
s:=s*2;
t:=t+s;
end;
writeln(t);
readln;
end.
Mình sẽ nêu ý tưởng và bạn hoàn chỉnh thành chương trình nhé
Câu 1 và câu 2 là cách số từ n đến m phải không bạn ?
1.
s:=0;
for i:=m to n do
if i mod 3=0 then s:=s+i;
2.
s:=0;
for i:=m to n do
if (i mod 3=0) and (i mod 5=0) then s:=s+i;
3.
s:=0;
for i:=1 to m do
s:= s+i*i;
4. Ý tưởng ta có :
12 tháng = 0,15%*12=1,8%
=> Tiền lãi nhận được 100*1.8/100=1.8 đồng
5. Ý tưởng ta có dãy : S=1+4+7+...+n (n là số tiền cần tìm);
Số số hạng là 20.
SSH= (n-1)/3+1=20
=> n=...
6. Ý tưởng ta có dãy : S=1+2+22+24+25+...+n (n là số cần tìm)
Bài này tương tự bài 5 tính tổng
7. Ý tưởng ta có :
a là gà
b là chó
if (a+b=36) and (a*2+b*4=100) then write(....
C++ nhé =))
#include <iostream>
using namespace std;
int main (){
int n;
int a;
int b;
cin >> n;
cin >> a;
cin >> b;
cout << "So tien ban dau cua An la " << a + (n - (a + b)) / (1 + 2) * 2 << endl;
cout << "So tien ban dau cua Binh la " << b + (n - (a + b)) / (1 + 2) << endl;
return 0;
}
- Tổng số ca: Tại ô E4 sử dụng công thức: =C4+D4. Sau đó sao chép công thức đến khối ô tính E5:E9 để tính cho những người còn lại.
- Tiền công: Tại ô F4 sử dụng công thức: =E4*F$2. Sau đó sao chép công thức đến khối ô tính F5:F9 để tính cho những người còn lại.
{ đơn giá: a, số lượng: b}
uses crt;
var a,b,s,thanhtoan:integer;
begin
write('nhap gia don hang:');
read(a);
write('nhap so luong hang:');
s:=0;
thanhtoan:=0;
s:=a*b;
if s>100 then thanhtoan:= s*(30/100)
else thanhtoan:= s* (10/100);
write(' so tien can thanh toan la:',' ',thanhtoan);
readln;
end.
uses crt;
var lt:real;
i,n,x:integer;
begin
clrscr;
x:=2;
n:=64;
lt:=1;
for i:=1 to n do
lt:=lt*x;
writeln('ket qua la: ',lt-1:4:2);
readln;
end.