BEGIN
INT I, SUM;
/* ЧИСЛО МОНЕТОК */
SUM := 0;
FOR (I := 0; I <= 10000; I++)
BEGIN
SUM := SUM + I;
END;
/* РЕЗУЛЬТАТ */
PRINTLN ('ЧИСЛО МОНЕТОК: ' + STR(SUM));
END
Возможно это объем который помещается на листе
1 КБит = 128 Байт
5 КБит = 640 Байт
Это выводит в какой по номеру день опаздало наибольшее количество учеников (1-пн, 2-вт и т.п.)
В RGB 256 цветов
256=2^8 --> 8 бит для одного пикселя (точки)
30*10*8=2400 бита = 300 байта <--- ответ