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.
Var i,n:integer;
s:longint;
Begin
Write('n = ');readln(n);
For i:=1 to n do
s:=s+i;
Write('Tong la ',s);
Readln;
End.
uses crt;
var n,i,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do
if i mod 2=0 then t:=t+i;
write(t);
readln;
end.
while..do
Program HOC24;
var i: byte;
t: integer;
begin
i:=1;
while i<=n do
begin
t:=t+i;
i:=i+1;
end;
write('Ket qua la: ',t);
readln
end.
uses crt;
var i,n,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do
if i mod 3=0 then t:=t+i;
write(t);
readln;
end.
program TinhTongTich;
var
N, i, Tong, Tich:integer;
begin
writeln('Nhap so nguyen duong N:');
readln(N);
i:=1;
Tong:=0;
Tich:=1;
while i<=N do
begin
Tong:=Tong+i;
Tich:=Tich*i;
i:=i+1;
end;
writeln('Tong cac so tu 1 den ', N, ' la: ', Tong);
writeln('Tich cac so tu 1 den ', N, ' la: ', Tich);
readln;
end.
#include <iostream>
int main() {
int n;
std::cout << "Nhap so tu nhien n: ";
std::cin >> n;
int sum = 0;
for (int i = 1; i <= n; i++) {
if (i % 3 == 0) {
sum += i;
}
}
std::cout << "Tong cac so tu nhien nho hon hoac bang " << n << " ma chia het cho 3 la: " << sum << std::endl;
return 0;
}
```c++
#include <iostream>
using namespace std;
int main() {
int n, sum = 0;
cout << "Nhap so nguyen duong n: ";
cin >> n;
for (int i = 1; i <= n; i++) {
if (i % 3 == 0) {
sum += i;
}
}
cout << "Tong cac so tu nhien nho hon hoac bang " << n << " ma chia het cho 3 la: " << sum;
return 0;
}
```