это икт
1)Is it possible to open Microsoft Excel in Word?
1) texts
2) pages
3) tools
4) symbols
5) files
2)In Microsoft Word, to start typing a new letter, open a new .
1) document
2) page
3) paper
4) tool
5) symbol
3)When you a document, it's sent to the recycle bin.
1) crash
2) kick
3) delete
4) destroy
5) erase
4)Deleted documents stay in the recycle bin until you it.
1) wash
2) full
3) small
4) empty
5) clean
5)If the computer crashes, you can try pressing the button.
1) restart
2) recommence
3) replay
4) reboot
5) crash
6)When I've finished using my computer, I always .
1) shut it down
2) shut it off
3) close it down
4) shut it on
5) shutitup
7)If I leave my computer on without using it, after a while it goes into mode.
7)If I leave my computer on without using it, after a while it goes into mode.
1) stand up
2) stand around
3) standby
4) waiting
5) standdown
8)Software which is easy to use is…
1) user-easy
2) usable
3) useless
4) user-hard
5) user-friendly
9)Software which is obvious to use is…
1) comprehensible
2) guessable
3) comprehensive
4) comprehensived
5) intuitive
10)Software which is not obvious to use is…
1) unintuitive
2) counter-intuitive
3) unintuitive
4) non-intuitive
5) anti-intuitive
11)Software for use by children and schools is…
1) educational
2) teaching
3) learning
4) teach
5) learn
12)Software for use by businesses is…
1) busy
2) businesslike
3) hard
4) activity
5) commercial
13)Software made specially for one company is…
1) tailor-made
2) unique
3) one-off
4) two-of
5) three-on
14)Software for use at home is…
1) for PC use
2) for home use
3) for house use…
4) for household use
5) forflatuse
15)Software which has been illegally copied is…
1) fake
2) false
3) true
4) pirated
5) unreal
16)Software which has been bought from the company that produced it is…
1) real
2) justified
3) fake
4) pirated
5) licensed
17)The text about typewriters is divided into three .
1) chunks
2) sections
3) levels
4) points
5) paragraphs
18)Times, Arial and Courier are types of .
1) lettering
2) learning
3) in front of
4) font
5) character
19)The text about typewriters is .
1) triple spaced
2) two space
3) double spaced
4) single spaced
5) one-and-half spaced
20)"Inventions that Changed the World" is the .
1) footer
2) footnote
3) notebook
4) front
5) header
21)Do you think the margins are too or ?
1) big / small
2) long / short
3) real / unreal
4) biggest
5) wide / narrow
22)Do you like the page ?
1) dictation
2) layout
3) pattern
4) organisation
5) buisness
23)"Winter / Spring Tours" is the .
1) under-heading
2) upper-heading
3) around-heading
4) sub-heading
5) below-heading
24)The body text is divided into two .
1) columns
2) pillars
3) strips
4) scripts
5) points
25)The body text is .
1) feeding
2) left-aligned
3) centred
4) justified
5) justifieding
26)The illustration isn't original artwork. It's .
1) clicker
2) clipart
3) free art
4) screen art
5) bodyart
27)The clipart has been given .
1) a sub-shadow
2) on shadow
3) by shadow
4) a drop shadow
5) an under shadow
28)This poster has been given a 10% grey background .
1) wash
2) colour
3) full
4) little
5) fill
29)The design of this poster is .
1) a bit amateurish
2) highly professional
3) state-of-the-art
4) lowlyprofessional
5) professionalism
30)Making changes to a text is called .
1) renewing
2) editing
3) altering
4) alerting
5) ending
//Pascal
const m = 1000
var
arr: array[1..m] of integer;
n,i, j, k: integer;
begin
readln(n);
write ('Исходный массив: ');
for i := 1 to n do begin
readln(arr[i]);
end;
//сортировка методом пузырька
for i := 1 to n-1 do
for j := 1 to n-i do
if arr[j] > arr[j+1] then begin
k := arr[j];
arr[j] := arr[j+1];
arr[j+1] := k
end;
write ('Отсортированный массив: ');
for i := 1 to n do
write (arr[i]:4);
end.
Алгоритм сортировки на классическом языке программирования С
# define SWAP(A,B) {A=A^B;B=A^B;A=A^B;}
void bubblesort(int A[], int n)
{
int i, j;
for(i = n-1 ; i > 0 ; i--)
{ for(j = 0 ; j < i ; j++)
{
if( A[j] > A[j+1] ) SWAP(A[j],A[j+1]);
}
}
}
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
Writeln(Range(1,100).Select(i->sin(i)*cos(i)).Where(x->x<>0).Average)
end.
Тестовое решение:
-0.00136006072493969
2. А вот так учат писать это же школьные учителя:
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
var
m:array[1..100] of real;
i,k:integer;
s:real;
begin
s:=0;
k:=0;
for i:=1 to 100 do begin
m[i]:=sin(i)*cos(i);
if m[i]<>0 then begin
s:=s+m[i];
k:=k+1
end
end;
Writeln(s/k)
end.
Тестовое решение:
-0.00136006072493969