Ответ:
а) матрицей меньшего ранга
Объяснение:
Var
a, b: integer;
x: real;
begin
readln(a, b, x);
writeln('Сумма = ', (160 / 4 - a) * x + (3 * 160 / 4 - b) * x / 2);
end.
1 этап - проектирование, составление формулы
2 этап - внедрить формулу в программу
3 этап - оптимизация и защита от дурака (не реализован, так как в школьных заданиях это не требуется)
Глубина цвета черно-белого рисунка 1бит=2 в степени 1 (т. е. может быть только 2 цвета - черный или белый) ; 10*10=100точек; 100*1=100бит. Ответ: 100бит.
//PascalABC.NET 3.4.2
begin
var ar := arrrandom(20, 100, 1000);
ar.Println.Take(10).Sum.Println;
ar.TakeLast(10).Sum.Println;
end.
Попробуй перезапустить, если не получается то только переустанавливать