Напишите программу формирования и вывода массива произвольного размера так, чтобы каждый последующий элемент, начиная с третьего, был равен сумме двух предыдущих элементов. два первых элемента задайте с клавиатуры. напишите программу формирования и вывода массива размером 6х3, каждые три последовательных элемента в строке которого составлены по следующему правилу: 1-й - равен случайному числу, отличному от нуля; 2-й - равен квадрату предыдущего элемента; 3-й - равен целой части частного от деления двух предыдущих элементов.

1. var a: array [1..100] of integer; i,n: integer; begin read(n); {количество эл. массива} read (a[1], a[2]); for i: =3 to n do a[i]: =a[i-1]+a[i-2]; for i: =1 to n do write (a[i],' ' ); end.2.const m=6; n=3; var a: array [1..100,1..100] of integer; i,j: integer; begin for i: =1 to m do read (a[i,1]); for i: =1 to m do begin j: =1; a[i,j+1]: = sqr(a[i,j]); a[i,j+2]: = a[i,j] div a[i,j+1]; {это условие мне не совсем понятно} end; for i: =1 to m do begin for j: =1 to n do write (a[i,j]: 3); writeln; end; end.

Этому есть несколько причин. 1. если имеется требование объявлять все переменные в программе, то это хранит программиста от искаженного указания имен переменных, например, xl вместо x1 или suma вместо summa. 2. объявление переменных позволяет явно указать их типы, а использование типизированных переменных позволяет с меньшими усилиями добиться правильной записи алгоритма. например, при типизации переменных последовательность команд c=5  a=3*c  c=a/3  недопустима. в самом деле, присваивание необъявленной переменной "с" значения целочисленной константы 5 подразумевает, что она тоже становится целочисленной. далее, по той же причине необъявленная переменная "а" также получает целый тип. и третий оператор выполняет деление. а такая операция деления дает вещественный результат и присваивание его целочисленной переменной "с" недопустимо, потом что к потере дробной части. и мы получаем сообщение об ошибке, т.е. можем вовремя ошибку увидеть и исправить её. 3. некоторые системы программирования независимо от того, объявлена переменная или нет, очищают её нулём (или делают пустой, если переменная символьная). а некоторые этого не делают. появление в программе необъявленной переменной с таким неопределенным значением может вызывать неожиданное поведение этой программы. многие системы, в которых объявление переменных обязательно, сообщение, что переменной не было присвоено начальное значение, что также избегать ошибок. 4. при объявлении переменных в одном месте, им всем отводится одна область памяти, что уменьшает затраты вычислительной системы на адресацию памяти и делает программу компактнее, а также ускоряет её работу. особенно это важно при нехватке оперативной памяти, когда программа вынужденно использует виртуальную память, которая располагается на внешнем носителе.

Program n94780249; const   s: longint = 0; var   x: longint;   t: string;   e: integer; begin   writeln('вводите целые числа (0 - окончание ввода) : ');   repeat     repeat       write('> ');       readln(t);       val(t, x, e);       if e < > 0 then         writeln('ошибка! повторите ввод. ')     until e = 0;     s += x   until x = 0;   if s = 0 then     writeln('числа не вводились. ')   else     writeln('сумма введённых чисел = ', s, #10);   write('для завершения работы нажмите ');   readln end.