5мбайт = 5000кбайт
5000 - 16
х - 40
(5000*40)/16 = 12500(кбайт)
Пробуй поменять
#include<windows.h>
на
#define _WIN32_WINNT 0x0500
#include<windows.h>
При палитре из 256 цветов на 1 пиксель необходимо log(2)256=8 бит.
На все изображение - 640*480*8 бит = 640*480 байт = 300 Кбайт, следовательно, в видеопамяти может разместиться 1 страница.
Первое задание:
var d: array [1..30] of integer;
i,s:integer;
begin
for i:=1 to 30 do
readln d[i];
s:=1;
for i:=2 to 29 do
s:=s*d[i];
writeln(s)
<span>end.</span>
Смотря на каком диске,а так файл