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.
Program bangCuuChuong9;
uses crt;
var i, n: integer;
begin
clrscr;
n:=9;
for i:=1 to 10 do
begin
writeln('9x',i,'=',n*i);
end;
readln;
end.
uses crt;
var s,i:integer;
begin
clrscr;
s:=0;
for i:=1 to 100 do s:=s+i;
writeln(s);
readln;
end.
#include <iostream>
using namespace std;
int main () {
int tong = 0;
for (int i = 1 ; i <= 100; i++) tong = tong + i;
cout << " Tong S = " << tong;
return 0;
}
Chạy chương trìnhTong S = 5050
uses crt;
var n,i,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
dem:=0;
for i:=1 to n do
if i mod 7=0 then inc(dem);
writeln('Co ',dem,' so chia het cho 7 trong khoang tu 1 toi ',n);
readln;
end.
1 là bn sửa hình nền
2 là mk gọi admin hoặc giáo viên khác khoá nick bn
program bang_nhan;
uses Crt;
var i,n:Integer
begin
clrscr;
n:=7;
for i:=1 to 10 do
WriteLn(n,'x',i:2,'=',n*i:3);
Readln
end.
Program cuu_chuong_7;
Var;
i : interger;
k : interger;
Begin;
for i := 1 to 10 do:
k := 7;
writeln (k, “x”, i, “=”, k * i);
End;