Những câu hỏi liên quan
Nhân Hiền
Xem chi tiết
✟şin❖
11 tháng 4 2020 lúc 21:02

Trong chương trình SAO3, có bao nhiêu câu lệnh? * 1 điểm 13 11 14 12➜CÓ 2 CÂU LỆNH

Bình luận (0)
Lê Thị Khánh Thi
Xem chi tiết
Điệp Hoàng
2 tháng 5 2022 lúc 16:46

D

Bình luận (0)
Trương Quang Đang
Xem chi tiết
Minh Lệ
16 tháng 3 2023 lúc 21:51

Program HOC24;

var i: byte;

begin

for i:=0 to 76 do write(i,' ');

readln

end.

Bình luận (2)
duy nguyễn nhất
Xem chi tiết
Tryechun🥶
17 tháng 3 2022 lúc 10:45

D

Bình luận (0)
Zero Two
17 tháng 3 2022 lúc 10:45

A

Bình luận (0)
duy nguyễn nhất
17 tháng 3 2022 lúc 10:47

cúi cùng a hay d vậy

Bình luận (1)
Nhân Hiền
Xem chi tiết
Nguyễn Lê Phước Thịnh
31 tháng 3 2020 lúc 15:35

dấu enter của bạn có vấn đề gì không vậy?

Bình luận (0)
 Khách vãng lai đã xóa
Nhân Hiền
Xem chi tiết
Nguyễn Thành Đạt
Xem chi tiết
loann nguyễn
29 tháng 7 2021 lúc 17:04

chọn A

Bình luận (0)
Quỳnh Anh
29 tháng 7 2021 lúc 17:05

Trả lời:

Hiến pháp Nước Cộng hòa xã hội Chủ nghĩa Việt Nam năm 2013 có bao nhiêu chương và bao nhiêu điều?

A. 11 chương, 120 điều.

B. 12 chương, 121 điều.

C. 13 chương, 122 điều.

D. 14 chương, 123 điều.

Bình luận (0)
Yến Phạm
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 10 2021 lúc 0:10

Câu 1: C

Câu 6: C

Bình luận (0)
KhanhHuy
Xem chi tiết
nguyễn an phát
21 tháng 3 2021 lúc 19:06

lệnh for...to...do:

a)program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  for i:=1 to 9 do s:=s+i;

  write(s);

readln;

end.

b)

program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  for i:=1 to 14 do

begin

if i mod 2=0 then

s:=s+i;

end;

  write(s);

readln;

end.

c)

program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  for i:=1 to 15 do

begin

if i mod 2=1 then

s:=s+i;

end;

  write(s);

readln;

end.

lệnh while...do

a)program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  i:=1;

while i<=9 do

begin

  s:=s+i;

i:=i+1;

end;

  write(s);

readln;

end.

b)program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  i:=1;

while i<=14 do

begin

if i mod 2=0 then

  s:=s+i

else i:=i+1;

end;

  write(s);

readln;

end.

c)

program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  i:=1;

while i<=15 do

begin

if i mod 2=1 then

  s:=s+i

else i:=i+1;

end;

  write(s);

readln;

end.

Bình luận (0)