Type mas=array of integer;
procedure revers(var a:mas; i:integer);
begin
write(a[i],' ');
if i>0 then revers(a,i-1);
end;
var a:mas;
i,n:integer;
begin
readln(n);
setlength(a,n);
for i:=0 to n-1 do
read(a[i]);
revers(a,n-1);
end
после writeln() должно стоять ( ;)
и в конце не нужна readln
Надо просто перемножить.
240 * 360 * 4 = 345600 байт
345600 / 1024 = 43200 кб
на 32 оттенка надо 5 бит, 2^5 = 32
1024*768 * 5 бит = 3932160 байт
3932160 /1024 = 3840 кб
Что там делать со степенями N I K V я не понимаю
Просыпаюсь >потягиваюсь >встаю с кровати>иду чистить зубы>одеваюсь>обуваюсь >иду до школы и тд.
23мб - 23352кб
512бит - 64байи
7гб- 7516192768байт
36кб - 36864байт