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.

b) 

uses crt;

var s,i,a:longint;

begin

clrscr;

s:=0;

a:=1;

for i:=1 to 35 do 

  begin

s:=s+a;

a:=a+3;

end;

writeln('So vien keo la: ',s);

readln;

end.

26 tháng 1 2021

Cảm ơn bạn nhiều!!!! 😘😘

uses crt;

var t,v,i,tien:integer;

begin

clrscr;

write('Nhap so von la: '); readln(v);

write('Nhap lai suat:'); readln(i);

write('Nhap so tien can co la: '); readln(tien);

t:=v+v*i;

writeln('So thang la: ',(tien div t)+1);

readln;

end.

26 tháng 4 2021

giúp mình vs ạ

 

27 tháng 4 2021

Giup minh voi aj 9h30 minhf thi roi

 

Cau 4:

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

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

cout<<t;

return 0;

}

Câu 5: 

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

i:=0;

while i<=100 do 

 begin

i:=i+1;

t:=t+i;

end;

writeln(t);

readln;

end.