Вычислите n-й элемент последовательности фибоначчи. последовательность фибоначчи имеет вид: (1, 1, 2, 3, 5, 8, то есть первые два элемента равны 1 , а каждый следующий, начиная чс третьего, вычисляется как сумма двух предыдущих. pascal abc
№1 program z1; const n = 3; m =3; var a: array[1..n, 1..m] of integer; i,j,min: integer; begin //заполним матрицу и найдем минимальное min: =20; for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(41)-20; if a[i,j] < min then min: =a[i,j]; write(a[i,j]: 4); end; writeln; end; writeln; // меняем минимальное на 0 и выводим матрицу for i: =1 to n do begin for j: =1 to m do begin if a[i,j] = min then a[i,j]: =0; write(a[i,j]: 4); end; writeln; end; end. тестовое решение для 1 : 18 20 -10 19 -14 -17 -4 -17 -15 18 20 -10 19 -14 0 -4 0 -15 №2 program z2; const n = 3; m =5; var a: array[1..n, 1..m] of integer; i,j,min: integer; begin //заполним матрицу for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(41)-20; write(a[i,j]: 5); end; writeln; end; writeln; // меняем все элементы на их квадраты и выводим матрицу for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =sqr(a[i,j]); write(a[i,j]: 5); end; writeln; end; end. тестовое решение для №2 15 8 18 -17 10 -19 17 1 20 -15 -20 -13 -11 -3 17 225 64 324 289 100 361 289 1 400 225 400 169 121 9 289
Coffee3862
07.11.2020
Аргументов пять, поэтому строк в таблицы истинности будет: 2^5 =32 в 1/4 от них f=1, то есть в 32/4 = 8 строках f=1в пяти строках: f g f⇒g 1 1 11 1 10 0 10 0 10 0 1все остальные строки - с различными значениями f и g, то есть есть строки , где ещё шесть раз f=1, а g =0 f g f⇒g 1 0 01 0 01 0 01 0 01 0 01 0 0именно в этих шести строках импликация f⇒g =0, во всех других строках f=0, а 0⇒0 =1 и 0⇒1=1 вывод: 6 - число значений 0 для функции f⇒g в таблице истинности.