Đa phương tiện

Lê Nhật Ninh
Xem chi tiết
Vanh Nek
22 tháng 10 2022 lúc 22:02

ngồi hóng câu hỏi ra quá nè:)

Bình luận (1)
Kurouba Ryousuke
22 tháng 10 2022 lúc 22:04

yeah (: hóng

 

Bình luận (0)
Hquynh
22 tháng 10 2022 lúc 22:06

:v vẫn chưa có sao ak, sao lâu thế ak 

Bình luận (1)
Lê Nhật Ninh
Xem chi tiết
Đỗ Thanh Hải
19 tháng 10 2022 lúc 23:15

quá nà hấp dẫn

Bình luận (0)
Anh Thư Bùi
19 tháng 10 2022 lúc 23:17

Ủa k có T.Anh thật ạ :_)?

Bình luận (1)
Nguyễn Ngân Hòa
20 tháng 10 2022 lúc 8:05

Khi nào có Vật lí 10 cho mình xin một chân vào học hỏi với :33

Bình luận (0)
Minh Lệ
Xem chi tiết
#Blue Sky
22 tháng 9 2022 lúc 18:55

- Các phần mềm mà em đã được học từ chương trình Tin học là: PowerPoint; Excel; Word;..v..v..
- Trong số những phần mềm đó em thích nhất là được sử dụng phần mềm PowerPoint vì phần mềm rất tiện lợi, vừa là một công cụ để giáo viên dạy học và để học sinh thuyết trình, qua đó còn có thể giúp trí óc của mỗi người sáng tạo hơn.

Bình luận (0)
Bảo Chu Văn An
22 tháng 9 2022 lúc 18:49

Em thích sử dụng phần mềm Microsoft Word, tại vì nó giúp em có thể soạn thảo được nhiều văn bản.

Bình luận (0)
M r . V ô D a n h
22 tháng 9 2022 lúc 18:49

Tham khảo ạ:

Một số phần mềm giải trí mà em thích đó là phần mềm chơi cờ, phần mềm nghe nhạc (Zing mp3, Sound cloud), phần mềm xem video (Youtube). Bởi vì những phần mềm này giúp con người có những phút thư giãn đầu óc, thay đổi không khí sau những khoảng thời gian làm việc căng thẳng.

Bình luận (1)
annie
Xem chi tiết
vinh le
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 12 2021 lúc 20:16

Câu 2: 

Kinh tế tri thức là nền kinh tế mà trong đó tri thức là yếu tố quan trọng trong việc tạo ra của cải vật chất và tinh thần của xã hội.  
Bình luận (0)
HSNK HSG
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 10 2021 lúc 0:01

uses crt;

var a:array[1..50]of int64;

i,n,t,max,min:int64;

begin

clrscr;

readln(n);

for i:=1 to n do 

  readln(a[i]);

max:=a[1];

min:=a[1];

t:=0;

for i:=1 to n do 

begin

if max<a[i] then max:=a[i];

if min>a[i] then min:=a[i];

t:=t+a[i];

end;

writeln('Tong la: ',t);

writeln('So lon nhat la: ',max);

write('Vi tri la: ');

for i:=1 to n do

if a[i]=max then write(i:4);

writeln;

writeln('So nho nhat la: ',min);

write('Vi tri la: ');

for i:=1 to n do 

if a[i]=min then write(i:4);

readln;

end.

Bình luận (0)
Thảo Phương
Xem chi tiết
Đoàn Xuân Sơn
25 tháng 6 2021 lúc 23:18

const fi='test.inp'
        fo='test.out'
var
f:text;
n,i,j,t:longint;
a:array[1..100] of longint;
b:array[1..1000000000] of boolean;
procedure ip;
 begin
        assign(f,fi);
        reset(f);
        readln(f,n);
        for i:= 1 to  n do
                read(f,a[i]);
        close(f);
 end;
procedure out;
 begin
        assign(f,fo);
        rewrite(f);
        for i:= 1 to n do
                begin
                b[a[i]]:=true;
                t:=a[i];
                for j:= i+1 to n do
                        begin
                             b[a[j]] := true;
                             b[a[i]+a[j]]:= true;
                             t:=t+a[j];
                             b[t]:=true;
                        end;
                end;
        t:=1;
        while b[t] = true do
                inc(t);
        write(f,t);
        close(f);
 end;
BEGIN
ip;
out;
END.

Bình luận (1)
Phạm Lan
Xem chi tiết
Nông Quang Minh
6 tháng 7 2021 lúc 10:37

k biết

Bình luận (0)
slime Bear
Xem chi tiết
Trần Nhật Phong
Xem chi tiết
Nguyễn Lê Phước Thịnh
23 tháng 1 2021 lúc 13:48

uses crt;

var a,b:array[1..100]of integer;

i,n,kt,dem,j:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

dem:=0;

for i:=1 to n do 

  if a[i]>1 then

begin

kt:=0;

for j:=2 to a[i]-1 do 

  if a[i] mod j=0 then kt:=1;

if kt=0 then 

begin

inc(dem);

b[dem]:=a[i];

end;

end;

if dem=0 then writeln('Khong co so nguyen to trong day')

else begin

writeln('Cac so nguyen to trong day la: ');

for i:=1 to dem do 

  write(b[i]:4);

end;

readln;

end. 

Bình luận (0)