<span>ДАНО:2^30
НАЙТИ В МБАЙТАХ
</span><span>2^30/2^3/2^10/2^10=2^7=128</span>
if a mod 2= 0 then - это ты проверяешь на четность
n:=0;
если условие соблюдается n:=n+1- то n:=0+1
Не понял, зачем тебе переменная m? Вот программа
program num9;
const
N = 5;
var
a: array [1..N] of integer;
i: integer;
begin
for i := 1 to N do
readln(a[i]);
for i := N downto 1 do
if (a[i] < 0) and (sqr(a[i]) < 7000) then
writeln(a[i]);
end.
Uses crt;var i,j,k:0..9; kol:integer;beginkol:=0;For i:=1 to 9 do For j:=0 to 9 do For k:=0 to 9 do if (i+j+k)=10 then inc(kol);writeln('Result: ',kol);end.
Жорсткий диск,ссд накопитель,відеокарта,процесор