на языке Паскаль.
uses crt;var a:array[1..1000] of integer; i,n,sum:integer;beginwrite('Введите число: ');read(n);for i:=1 to n-1 do if (i mod 3=0) and (i mod 5<>0) then sum:=sum+i;write(sum);end.
Ответ:
18 834 588 байт
Объяснение:
Число пикселей 1 772 × 3 543 = 6 278 196
Если на 1 пиксель надо 3 байта, то всего надо 18 834 588 байт