Program ghg;
var a,b,s:integer;
begin
writeln('vvedite a');
readln(a);
writeln('vvedite b');
readln(b);
if (a<=2*109) and (b<=2*109) then
s:=a+b;
writeln('s=',s);
end.
Program p1;
var i:integer;
a:array[1..10] of integer;
begin
for i:=1 to 10 do
begin
writeln('Введите ',i,' число: ');
read(a[i]);
end;
for i:=1 to 10 do
if (a[i] mod 3)=0 then writeln('Число: ',a[i]);
<span>end.</span>
Cпица.......................!
256 цветов кодируются 8 битами (что равно 1 байту), т.к. 2^8=256 и в 1 байте 8 бит. Т.е. на каждый пиксель изображения нужен 1 байт видеопамяти. Итого:
800*600*1=480000 байт на 1 кадр. Всего у нас 16 кадров в секунду, а весь ролик длится 1 минуту=60 сек.
Итого 480000*16*60=460800000 байт = 460800000/1024/1024 мегабайт = 439,453125 мегабайт.
Потому что он не запраграмирован