Аязыке паскаль 1)заполните массив а первыми n натуральными числами,начиная с x(ввести x с клавиатуры) в обратном порядке( начиная с конца массива) 2)заполнить массив a первыми n числами фибоначчи.первые два числа фибонначи равны еденице, а каждое последующее число фибонначи вычисляется как сумма двух предыдущих , надо!
Если что, программы проверял в PascalABC.NET 3.4.2, сборка 1837 от 12.10.2018
Первая программа (запрашивает значение икс, и в ответ выводит соответствующее значение зет):
var
x, Z: real;
begin
writeln('Введите исходные данные:');
write('x= ');
read(x);
if (x < -1) or (x > 1) then Z := 0
else Z := 1 - Abs(x);
writeln('ответ: Z= ', Z);
end.
Вторая программа (выводит значения икс в указанном диапазоне и с указанным шагом, и рядом с ними- соответствующие значения зет):
var
x, Z: real;
begin
writeln(' x Z');
x := -1.5;
while x <= 1.5 do
begin
if (x < -1) or (x > 1) then Z := 0
else Z := 1 - Abs(x);
writeln(x:4:1, Z:6:1);
x := x + 0.5;
end;
end.
Будет выведено примерно так (только там одинаковая ширина символов, поэтому всё ровненько выглядит):
x Z
-1.5 0.0
-1.0 0.0
-0.5 0.5
0.0 1.0
0.5 0.5
1.0 0.0
1.5 0.0
См. Объяснение
Объяснение:
Дано А1 = $D4+E$5
Константы - столбец D и ячейка E5: если бы протянули вниз формулу, записанную в А1, то при столбце D менялись бы номера ячеек (5; 6 и т.д.), а число, записанное в ячейке Е5, было бы константой.
Поэтому копирование А1 и вставка в В2 даёт: сохранение столбца D, но ячейку 5 (на 1 больше, т.к. В2 ниже А1 на одну строку), и новое второе неизменное слагаемое, которое записано в ячейке F5. Таким образом, формула в ячейке В2 будет иметь вид:
= $D5+F$5
Поэтому, чтобы получить количественное значение, которое рассчитает Excel и покажет в ячейке В2, необходимо сложить 2 числа:
1) записанное в ячейке D5;
2) записанное в ячейке F5.