Проснулся
Встал с кровати
Пошел в туалет
Зашёл вк
Поставил чай и сделал бутеров
Затем собрал портфель
После пошёл покушал
Одел школьную форму и пошёл на остановку
Сел и поехал
<em>// PascalABC.NET 3.2, сборка 1363 от 17.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var m:=ReadInteger('Количество строк в матрице:');
var n:=ReadInteger('Количество столбцов в матрице:');
Writeln('*** Исходная матрица [',m,'x',n,'] ***');
var a:=MatrRandom(m,n,-50,50);
a.Println(4); Writeln(4*a.ColCount*'-');
var q:=a.Cols.Select(x->x.First<x.Last).ToArray;
var k:=q.Where(r->r).Count;
Writeln('*** Результирующая матрица [',m,'x',k,'] ***');
var b:=MatrFill(m,k,0);
var l:=0;
for var j:=0 to n-1 do
if q[j] then begin
for var i:=0 to m-1 do b[i,l]:=a[i,j];
l+=1
end;
b.Println(4)
end.
<u>Пример</u>
Количество строк в матрице: 5
Количество столбцов в матрице: 8
*** Исходная матрица [5x8] ***
15 -35 -11 -18 49 -32 31 -47
-21 -46 7 -48 3 24 -48 5
28 -46 36 -9 17 -32 -44 -10
-16 7 -14 40 13 30 50 -28
-8 35 -49 47 -31 30 18 20
--------------------------------
*** Результирующая матрица [5x4] ***
-35 -18 -32 -47
-46 -48 24 5
-46 -9 -32 -10
7 40 30 -28
35 47 30 20
c*a+b=-1
-1*a+b=0
0*a+b=4
b=4, a=b=4, c=-5/4
“c” - не целое число, вопреки условию.
То есть при заданных аргументах, задача не решаема.
В тоже время, задача становится решаемой, если первый член последовательности равен не -1, а -2 (то есть при последовательности -2,0,4).
c*a+b=-2
-2*a+b=0
0*a+b=4
b=4, a=2, c=-3
Четвертый член последовательности, в этом случае, вычисляется так:
4*a+b=4*2+4=12
C/C++
#include <iostream>
#define _USE_MATH_DEFINES
#include <math.h>
using namespace std;
int main(){
double angle;
cout << "Enter angle: ";
cin >> angle;
angle = angle * (M_PI / 180);
printf("\nsin: %.4f", sin(angle));
printf("\ncos: %.4f", cos(angle));
return 0;
}
1)128×64×8=65536 бита
2)65536÷8=8192 байт
3)8192÷1024=8 килобайт
Ответ: В) 8 Килобайт
