Программист торопился и ошибся в записи оператора присваивания на языке Паскаль: x:=a*3+sqrt9. Какая ошибка допущена? 1 Пропущен знак умножения 2 Перепутаны знаки арифметических операций 3 Нет верного ответа 4 Аргумент записан без скобок
10.Среди приведенных записей отыщите формулу для электронной таблицы.
ответ: 4) =D5*C8-A3*B2.
Формулы в Excel начинаются со знака «=»
11. В ячейку С8 ввели формулу =(С6 – С7)*$D$4. Затем эту формулу распространили вправо. Какая формула содержится в ячейке F8?
ответ: =(D6-D7)*$D$4, так как сместили вправо изменились только буквы $-сталые значения
12. В ячейку F13 ввели формулу =F12 / $B$4. Затем эту формулу распространили вниз. Какая формула содержится в ячейке F15?
ответ: =F14/$B$4, так как сместили вниз изменились только цифры (+1 на 1 клетку)
13. В ячейки C3, C4, D3, D4 введены соответственно числа 10, 4, 6, 5. Какое число будет находиться в ячейке D8 после введения в эту ячейку формулы =СУММ(C3:D4)?
ответ: 4) 25, 10+4+6+5=25
14. Документом (объектом обработки) MS Excel является файл с произвольным именем и ответ: 2) расширением .xls
15. В терминах MS Excel файл называется: ответ: 3) рабочей книгой
Задача 1 var a:array [1..100] of integer; i,n:integer; begin writeln('Введите n <=100'); readln(n); writeln('Введите массив'); for i:=1 to n do readln(a[i]); writeln('Массив'); for i:=1 to n do write(a[i], ' '); writeln; writeln('Элементы равные сумме двух соседей:'); for i:=2 to (n-1) do if a[i]=(a[i-1]+a[i+1]) then write(a[i],' '); writeln; end.
задача 5 var a:array [1..10000] of integer; i,n, mx1, mx2:integer; begin writeln('Введите n <=10000'); readln(n); writeln('Введите массив'); for i:=1 to n do readln(a[i]); writeln('Массив'); for i:=1 to n do write(a[i], ' '); writeln; mx1:=1; for i:=2 to n do if a[i]>a[mx1] then mx1:=i; if mx1=1 then mx2:=2 else mx2:=1; for i:=1 to n do if (a[i]>a[mx2])and(i<>mx1) then mx2:=i; writeln('Два числа произведение которых максимально: ',a[mx2],' ',a[mx1]); end.
10.Среди приведенных записей отыщите формулу для электронной таблицы.
ответ: 4) =D5*C8-A3*B2.
Формулы в Excel начинаются со знака «=»
11. В ячейку С8 ввели формулу =(С6 – С7)*$D$4. Затем эту формулу распространили вправо. Какая формула содержится в ячейке F8?
ответ: =(D6-D7)*$D$4, так как сместили вправо изменились только буквы $-сталые значения
12. В ячейку F13 ввели формулу =F12 / $B$4. Затем эту формулу распространили вниз. Какая формула содержится в ячейке F15?
ответ: =F14/$B$4, так как сместили вниз изменились только цифры (+1 на 1 клетку)
13. В ячейки C3, C4, D3, D4 введены соответственно числа 10, 4, 6, 5.
Какое число будет находиться в ячейке D8 после введения в эту ячейку формулы =СУММ(C3:D4)?
ответ: 4) 25, 10+4+6+5=25
14. Документом (объектом обработки) MS Excel является файл с произвольным именем и
ответ: 2) расширением .xls
15. В терминах MS Excel файл называется:
ответ: 3) рабочей книгой
var
a:array [1..100] of integer;
i,n:integer;
begin
writeln('Введите n <=100');
readln(n);
writeln('Введите массив');
for i:=1 to n do
readln(a[i]);
writeln('Массив');
for i:=1 to n do
write(a[i], ' ');
writeln;
writeln('Элементы равные сумме двух соседей:');
for i:=2 to (n-1) do
if a[i]=(a[i-1]+a[i+1]) then write(a[i],' ');
writeln;
end.
задача 5
var
a:array [1..10000] of integer;
i,n, mx1, mx2:integer;
begin
writeln('Введите n <=10000');
readln(n);
writeln('Введите массив');
for i:=1 to n do
readln(a[i]);
writeln('Массив');
for i:=1 to n do
write(a[i], ' ');
writeln;
mx1:=1;
for i:=2 to n do
if a[i]>a[mx1] then mx1:=i;
if mx1=1 then mx2:=2 else mx2:=1;
for i:=1 to n do
if (a[i]>a[mx2])and(i<>mx1) then mx2:=i;
writeln('Два числа произведение которых максимально: ',a[mx2],' ',a[mx1]);
end.