Những câu hỏi liên quan
Thảo Nguyễn
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 2 2022 lúc 14:59

Bài 2: 

a: Input: 50 số từ 1 đến 50

Output: Tổng các số nguyên tố

c: Viết chương trình:

uses crt;

var i,j,t,kt:integer;

begin

clrscr;

t:=0;

for i:=2 to 50 do 

  begin

kt:=0;

for j:=2 to trunc(sqrt(i)) do 

  if i mod j=0 then kt:=1;

if kt=0 then t:=t+i;

end;

writeln(t);

readln;

end.

Bình luận (0)
Kimian Hajan Ruventaren
Xem chi tiết
Nguyễn Lê Phước Thịnh
4 tháng 12 2021 lúc 22:57

S=0

Bình luận (0)
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
16 tháng 5 2017 lúc 11:56

Đáp án đúng : B

Bình luận (0)
28 Nhật Quý
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 3 2022 lúc 9:46

s có gán gì trước đâu bạn?

Bình luận (1)
Nguyễn Ngọc
Xem chi tiết
Nguyễn Lê Phước Thịnh
23 tháng 2 2021 lúc 23:07

Câu 19: B

Cau 21: C

Bình luận (0)
Nguyễn Ngọc
23 tháng 2 2021 lúc 22:06

mn ơi giúp mk

 

Bình luận (0)
Cong Doan
Xem chi tiết
Lương Gia Bảo
Xem chi tiết
HT.Phong (9A5)
24 tháng 3 2023 lúc 5:54

Uses crt;

var

begin clrscr;

k:=1;

s:=0;

while (s<700) do begin

k:=k+1

s:=s+k;

end;

writeln(s,' ',k);

readln;

end; 

Bình luận (0)
Chuppi
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
9 tháng 10 2019 lúc 7:29

Đáp án đúng : A

Bình luận (0)