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.

18 tháng 11 2021

ko ngen

18 tháng 11 2021

ủa là sao, ko thì thoi chứ mắc j chọc ghẹo ngt

26 tháng 6 2023

chịu

 

Python:

n=int(input("Nhap so nguyen duong n:"))

dem=0

for i in range(1,n+1):

 if i%4==0:

  dem=dem+1

print(dem)

31 tháng 10 2021
ĐúngTrue
|x|=2abs(x)=2

 

const fi='so.equ';

fo='soam5.equ';

var f1,f2:text;

i,n:integer;

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

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

n:=0;

while not eoln(f1) do

begin

inc(n);

read(f1,a[n]);

end;

for i:=1 to n do

if (a[i]<0) and (a[i] mod 5=0) then write(f2,a[i]:4);

close(f1);

close(f2);

end.

22 tháng 8 2023

Đồng ý với ý kiến

=> Khi cùng tim thông tin về một vấn đề, nhưng có người sẽ tìm được rất nhanh và chính xác, có người thì không vì cách họ tìm kiếm tài liệu không đúng hoặc từ khóa tìm kiếm chưa đầy đủ

17 tháng 11 2021

Quảng cáo Hoidap247 bên Hoc24 ? lag à 

17 tháng 11 2021

Ui, bạn ơi, vào chỗ khác mà quảng cáo nha, ở đây chỉ có fan HOC24 thoi =))

13 tháng 3 2021

Program HOC24;

var s: string;

begin

write('Nhap xau: '); readln(s);

delete(s,1,1);

write(s);

readln

end.

14 tháng 3 2023

Var a:array[1..100] of integer;

i,s:integer;

Begin

For i:=1 to 100 do

Begin

Write('Nhap phan tu thu ',i,' = ');readln(a[i]);

If a[i] mod 2 <> 0 then s:=s+a[i];

End;

Write('Tong la ',s);

Readln;

End.

15 tháng 3 2023

em cảm ơn ạ <3

à nó có updates kìa, bạn updates đi

bạn thử vào microsoft store xem