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.

29 tháng 3 2023

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

29 tháng 3 2023

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.

11 tháng 3 2022

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.

#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;

}

26 tháng 2 2021

Bước 1: Nhập n là số cần in ra bảng nhân của số đó

Bước 2: i←1; 

Bước 3: Nếu i>n thì kết thúc thuật toán

Bước 4: In ra màn hình kết quả của câu lệnh writeln(i,'x',n,'=',i*n)

Bước 5: i←i+1, quay lại bước 3

Bước 1: Nhập n

Bước 2: i←1; 

Bước 3: Nếu i>n thì kết thúc thuật toán

Bước 4: In ra màn hình kết quả của câu lệnh writeln(i,'x',n,'=',i*n)

Bước 5: i←i+1, quay lại bước 3

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.

8 tháng 5 2022

Program bt;

Uses crt;

Var i, n: Integer;

begin

clrscr;

Write('Nhap n='); Read(n);

For i:=1 to n do if n mod 2=0 write('cac so tu 1 den n la',i,');

Readln;

End.

20 tháng 3 2023

program SoHoanHao;

uses crt;

var

     i, j, n, s: integer;

begin

     clrscr;

     write('Nhap n: ');

     readln(n);

     for i := 1 to n do

     begin

          s := 0;

          for j := 1 to i - 1 do

          begin

               if i mod j = 0 then

                    s := s + j;

               end;

               if s = i then

                    writeln(i);

     end;

     readln;

end.