1)что является знаковой формой представления информации? а) диаграмма б) график функции в) уравнение г) устная формулировка 2)как называется алгоритм в котором последовательность одних и тех же действий повторяется до определённого момента? а) переменная б) цикл в) счетчик г)линейка 3)выберите все примеры неформальных исполнителей. а) компьютер выполняет программу проверки правописания б) музыкант импровизирует при исполнении номера в) ученик заучивает стихотворение г) станок вытачивает деталь, согласно чертежу 4)сопоставьте свойства алгоритма с его определениями. а конечность б определённость в массовость г дискретность 1 каждое из действий и весь алгоритм в целом обязательно завершаются 2 свойство предполагает, что алгоритм должен быть пригоден для решения всех данного типа 3 алгоритм должен представлять процесс решения как последовательное выполнение простых шагов 4 алгоритм не должен содержать команды, смысл которых может восприниматься неоднозначно а) а - 3, б - 1, в - 4, г - 2 б) а - 1, б - 4, в - 2, г - 3 в) а - 4, б - 2, в - 1, г - 3 г) а - 3, б - 2, в - 1, г - 4 5)верны ли следующие утверждения? 1. функция abs вычисляет квадратный корень числа. 2. функция random возвращает модуль числа. а) верно только первое б) верно только второе в) оба верны г) ни одно не верно 6)к какому типу данных принадлежит число 3,14? а) к вещественному б) к целому в) к строковому г) к логическому 7)для чего служит раздел var в среде pascal? а) для описания выражений б) для описания величин в) для описания используемых переменных г) для вывода значения 8)значение элементов двух массивов размером [1..100] с следующего фрагмента программы: for i: =1 to 100 do a[i]: =50-i; for i: =1 to 100 do b[i]: =a[i]+49; сколько элементов массива в будет иметь отрицательные значения? а) 99 б) 49 в) 51 г) 1 9)какие значения примут элементы массива а[3] и а[4] после выполнения последовательности операторов, если первоначально: a[3]: =5; а[4]: =6; а[3]: =a[4]; а[4]: =a[3]; а) a[3]=6; a[4]=6 б) a[3]=6; a[4]=5 в) a[3]=5; a[4]=6 г) a[3]=5; a[4]=5 10)в таблице rost хранятся данные о росте в сантиметрах по группе учащихся спортивной школы (rost[1] – рост первого учащегося,rost[2] – рост второго учащегося и т.д.) определите, что будет напечатано в результате выполнения следующего алгоритма. var i, n: integer; rost: array[1…14] of integer; begin rost[1]: = 165; rost[2]: = 172; rost[3]: = 175; rost[4]: = 168; rost[5]: = 171; rost[6]: = 169; rost[7]: = 172; rost[8]: = 165; rost[9]: = 159; rost[10]: = 173; rost[11]: = 166; rost[12]: = 169; rost[13]: = 174; rost[14]: = 168; n: =0; for i: = 1 to 14 do if rost[i] > 170 then begin n: =n+1; end; writeln(n); end.
// 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
//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]);
}
}
}