Нужно 64 умножить на 128 и опять умножить на. 256= х байт дальше разберетесь сами
Процессор предназначен для обработки данных и управления работой компьютера
P.S ( Ставь лучший ответ ;) Спасибо )
<span><span>uses crt;
const n=7;
var sr:real;
i:integer;
a:array[1..n] of integer;
begin
clrscr;
sr:=0;
writeln('Vvedite temperaturu za kajdyi den ');
for i:=1 to n do begin
readln(a[i]);
sr:=sr+a[i];
end;
sr:=sr/7;
write('Srednya temperatura = ',sr:0:2);
readkey;
end.</span></span>
Program bbb
var
N,k:integer;
begin
writeln('введите число N');
readln(N);
k=0;
for 1 to N do
begin;
if k mod 5=0 then
k:=k+1;
writeln(k);
end;
end. Попробуй так должно получится, если не получается добавь переменную i в разделе var и вставь сюда (for i=1 to N do...)