begin
var a := MatrRandom(4, 3, -99, 99);
a.Println(4);
a.ElementsByRow.Where(p -> p > 1).Count.Println
end.
Агрегирование и синдикация информации; наполнение сайта; дизайн
Алг Манхеттен
нач
вещ x, s
цел i
вывод "x =", нс
ввод x
s:=20
нц для i от 1627 до 2017
s:=s+s*x/100
кц
вывод "s = ", s
кон
64 ГБ - 65536 МБ
Фильм - 1300,48 МБ
Фото - 1525,76 МБ
Отчет - 15,4 МБ
1300,48 + 1525,76 + 15,4 = 2841,64 МБ
65536 - 100 %
2841.64 - X %
2841.64 * 100 / 65536 ≈ 4.3%