Những câu hỏi liên quan
Thịnh nguyễn
Xem chi tiết
Ngủ ✰_
18 tháng 3 2022 lúc 9:27

uses crt;

var i:integer;

begin

clrscr;

writeln('Bang cuu chuong 3 la: ');

for i:=1 to 10 do 

  writeln('3*',i,'=',3*i);

readln;

end.

Bình luận (5)
₷ųʨ∡
18 tháng 3 2022 lúc 9:28

tham khảo:
 uses crt;

var i:integer;

begin

clrscr;

writeln('Bang cuu chuong 3 la: ');

for i:=1 to 10 do 

  writeln('3*',i,'=',3*i);

readln;

end.

 

Bình luận (1)
Herera Scobion
18 tháng 3 2022 lúc 9:28

python hay pascal bạn ơi

Bình luận (1)
Công danh
Xem chi tiết
Trúc Giang
18 tháng 1 2021 lúc 19:54

Program mun;

Uses crt;

Var i:integer;

Begin

For i:=1 to 10 do write ('2 × ', i,' = ', 2*i);

Readln;

End.

P/s: Ko chắc ạ!

Bình luận (0)
Nguyễn Lê Phước Thịnh
18 tháng 1 2021 lúc 21:28

uses crt;

var i:integer;

begin

clrscr;

for i:=1 to 10 do

writeln('2*',i,'=',2*i);

readln;

end.

Bình luận (0)
vy Lê
Xem chi tiết
Minh Lệ
26 tháng 2 2021 lúc 17:41

Program HOC24;

var n,i: integer;

begin

write('Nhap so nguyen: '); readln(n);

for i:=1 to 10 do

writeln(n,' x ',i,' = ',n*i);

readln

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
26 tháng 2 2021 lúc 21:29

uses crt;

var n,i:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to 10 do

writeln(n,'*',i,'=',n*i);

readln;

end.

Bình luận (0)
Lê Đoàn Bảo Long
Xem chi tiết
nguyễn an phát
24 tháng 3 2021 lúc 10:38

program bang_cuu_chuong;

uses crt;

var n,tich,i:integer;

begin

clrscr;

n:=2;i:=1;

while n<=9 do

begin

while i<=10 do

begin

tich:=n*i;

writeln(n,' x ',i,' = ',tich);

i:=i+1;

end;

n:=n+1;i:=1;

end;

readln;

end.

Bình luận (0)
T Đạt
Xem chi tiết
Thanh Phong (9A5)
29 tháng 3 2023 lúc 16:26

uses crt;
var n, i : integer;
begin clrscr;
readln(n);
for i:=1 to 9 do writeln(n,' x ', i, ' = ', n*i);
readln;
end.

Bình luận (0)
Nguyễn Hoàng Duy
29 tháng 3 2023 lúc 23:42

program MultiplicationTable;

uses crt;

var
  N, i, j: integer;

begin
  clrscr;
  write('Enter N: ');
  readln(N);

  for i := 1 to 9 do
  begin
    writeln(N, ' x ', i, ' = ', N*i);
  end;

  readln;
end.

Bình luận (0)
Ma Phan Đức
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 2 2021 lúc 17:02

Câu 1: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do 

  s:=s+i;

writeln('Tong cua 10 so tu nhien dau tien la: ',s);

readln;

end.

Câu 2: 

uses crt;

var a:array[1..100]of integer;

i,n,dem:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

dem:=0;

for i:=1 to n do

if a[i]>0 then inc(dem);

writeln('So luong phan tu duong la: ',dem);

readln;

end.

Câu 3: 

uses crt;

var i,j:integer;

begin

clrscr;

for i:=1 to 9 do 

  begin

      writeln('Bang nhan ',i,' la: ');

for j:=1 to 10 do 

  writeln(i,'*',j,'=',i*j);

delay(200);

end;

readln;

end.

Bình luận (0)
Dương Nguyệt Hạ
Xem chi tiết
Nguyễn Lê Phước Thịnh
16 tháng 3 2022 lúc 7:27

#include <bits/stdc++.h>

using namespace std;

long long i;

int main()

{

for (i=1; i<=10; i++)

cout<<"2*"<<i<<"="<<2*i<<endl;

return 0;

}

Bình luận (0)
Huyền Trang
Xem chi tiết
Nguyễn Lê Phước Thịnh
16 tháng 3 2021 lúc 23:25

uses crt;

var i:integer;

begin

clrscr;

writeln('Bang cuu chuong 3 la: ');

for i:=1 to 10 do 

  writeln('3*',i,'=',3*i);

readln;

end.

Bình luận (0)
28 Nhật Quý
Xem chi tiết
Vũ Quang Huy
11 tháng 3 2022 lúc 10:01

uses crt;

var i,n:integer;

begin

write('nhap n=');readln(n);

writeln('bang nhan',n);

for i:=1 to 10 do writeln(n,' x ',i:2,' = ',n*i:3);

readln

end.

Bình luận (0)