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.

16 tháng 3 2023

Uses crt;

var n,i,g: integer;

begin clrscr;

readln(n);

g:=0;

for i:=1 to n do if(i mod 2 =0) then g:=g+1;

write(n,' ');

readln;

end.

16 tháng 3 2023

In ra g chứ nhỉ sao lại in ra n bạn?

21 tháng 12 2021

C

21 tháng 12 2021

Chọn C

21 tháng 12 2021

Câu 1: B

5 tháng 1 2023

pascal giúp ,mik đc ko

 

 

25 tháng 9 2019

B1: Chuyển số nguyên dương qua xâu

B2: Chạy từ đầu đến hết xâu và cộng từng kí tự và cộng thêm 1 dấu cách

B3: In kết quả và kết thúc

21 tháng 12 2021

Chọn C

3 tháng 10 2018

b) https://scratch.mit.edu/projects/250009889/#editor

21 tháng 3 2023

n = int(input("Nhập vào một số nguyên dương: "))

if n < 0:

     print(n, "là số âm")

elif n > 0:

     print(n, "là số dương")

else:

     print(n, "là số 0")

Câu 1: 

Input: Dãy số nguyên

Output: Tổng các số chẵn trong dãy đó