сделать домашнее задание в Excel , построить параболу

x1 ≈ 2,3

x2 ≈ - 1,3

Смотри картинки

Объяснение:

1) В ячейку B1 пишем y = x*x - 2

2) В ячейку C1 пишем y = x + 1

3) В ячейку A2 пишем x

4) В ячейку B2 пишем y

5) В ячейку C2 пишем y

6) В ячейку A3 пишем -1,5

7) В ячейку A4 пишем -1,25

8) Выделите ячейки А3 и А4 в правом нижнем углу появится зелёный квадратик, а рядом с ним квадратик с выпадающим списком, в котором надо выбрать Заполнение. Потяните за зелёный квадратик вниз до А19.

9) В ячейку В3 пишем формулу = A3*A3-2

10) Копируем ячейку В3, выделяем диапазон В4:В19 и вставляем эту формулу

11) В ячейку С3 пишем формулу =A3+1

12) Копируем ячейку С3, выделяем диапазон С4:С19 и вставляем эту формулу

13) Выделяем диапазон А2:С19 выбираем вкладку Вставка, затем Диаграмма, Точечная. Появляется график.

14) По графику смотрим координаты х в точках пересечения графиков.

15) В ячейку N5 пишем x1 ≈ 2,3

16) В ячейку N6 пишем x2 ≈ - 1,3

Задача №1
var a:array[1..4, 1..5] of integer; 
i,j,k:integer; 
begin 
writeln('Заполните матрицу'); 
for i:=1 to 4 do 
for j:=1 to 5 do begin 
read(a[i,j]); 
if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j]; 
end; 
writeln('Сумма элементов кратных 3-м и > 20 = ',k); 
end.

Задача №2
var a:array[1..5, 1..5] of integer; 
i,j,k:integer; 
begin 
writeln('Заполните матрицу'); 
for i:=1 to 5 do 
for j:=1 to 5 do begin 
read(a[i,j]); 
if i=j then k:=k+a[i,j]; 
end; 
writeln('Сумма элементов главной диагонали = ',k); 
end.

Не самый рациональный метод решения, но как говорится чем смог тем

var a,b,c,x,kc,kn,k1,k2:integer; 
begin 
kc:=1; 
kn:=1; 
k1:=0; 
k2:=0; 
a:=0; 
b:=0; 
writeln('Введите число x'); 
read(x); 
while x>0 do begin 
c:=x mod 10; 
if c mod 2=0 then begin 
inc(k1); 
a:=a+c*kc; 
kc:=kc*10; 
end; 
if c mod 2<>0 then begin 
inc(k2); 
b:=b+c*kn; 
kn:=kn*10; 
end; 
x:=x div 10; 
end; 
if k1>k2 then writeln('Четных больше нечетных') else if k1=k2 then writeln('Количество четных = количеству нечетных') else writeln('Четных меньше нечетных'); 
writeln(a,' ', b); 
end.