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.

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.

16 tháng 5 2017

Đáp án đúng : B

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

11 tháng 3 2022

mình cx thấy sai sai /đề cô mình cho nên mk cx ko biết

Câu 17. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:=16;  T:=T  -n; end;A.2   B.3   C.4  D.5Câu 18: Cho đoạn chương trình sau:S:=10;  x:=0,5;While >=6,2 doS:=S-x;Hãy cho biết giá trị của S sau đoạn chương trình trên:A. 5                   B. 4                    C.6                       D.7Câu 19. Sau khi thực hiện đoạn chương trình sau:j:=0;    s:=1;for i:=1 to 3 doj:=j+1;s:=j+1;Gía trị của...
Đọc tiếp

Câu 17. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:=16;  T:=T  -n; end;

A.2   B.3   C.4  D.5

Câu 18: Cho đoạn chương trình sau:

S:=10;  x:=0,5;

While >=6,2 do

S:=S-x;

Hãy cho biết giá trị của S sau đoạn chương trình trên:

A. 5                   B. 4                    C.6                       D.7

Câu 19. Sau khi thực hiện đoạn chương trình sau:

j:=0;    s:=1;

for i:=1 to 3 do

j:=j+1;

s:=j+1;

Gía trị của biến j, biến s bằng?

A. j=4, s=3           B.j:=3; s=4            C.j:=1; s=2              D.j:=2; s:=3

Câu 21. Gỉa sử có dòng lệnh :

for i:=0 to 9 do

a:=1+i;

Số lần lặp của lệnh gán a:=1+i là:

A.11               B.0                 C.10                 D.9

2

Câu 19: B

Cau 21: C

23 tháng 2 2021

mn ơi giúp mk

 

24 tháng 3 2023

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; 

9 tháng 10 2019

Đáp án đúng : A