Những câu hỏi liên quan
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)
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)
Kiki :))
Xem chi tiết
Minh Lệ
26 tháng 2 2021 lúc 17:28

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ình luận (0)
Nguyễn Lê Phước Thịnh
26 tháng 2 2021 lúc 21:28

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

Bình luận (0)
DinoDrang
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 2 2023 lúc 15:38

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.

Bình luận (0)
Phạm Thị Đông Nhi_HDI
Xem chi tiết
shitbo
21 tháng 6 2020 lúc 16:54

program hello;

uses crt;

Var n,i,j,k: integer;

a: array[1..50] of integer;

begin;

a[1]:=k;

Readln(n);

For i:=1 to n do

Begin;

Writeln('nhap a[',i,'] '); Readln(a[i]);

End;

For i:=1 to n-1 do

For j:=i+1 to n do

If a[i]<a[j] then k:=a[j];

Writeln('gia tri lon nhat la', k);

end.

Bình luận (0)
 Khách vãng lai đã xóa
Nguyễn Thanh Anh
Xem chi tiết
hoangvinh
Xem chi tiết
Sinphuya Kimito
8 tháng 5 2022 lúc 7:15

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.

Bình luận (0)
Duy Thanh Bùi
Xem chi tiết
Duy Thanh Bùi
Xem chi tiết