Если нужно число 1410 перевести в 8-ми ричную систему числения, то:
1410 делим на 8, равно 176, остаток 2.
176 делим на 8, равно 22, остаток 0
22 делим на 8, равно 2, остаток 6
Теперь читаем с конца последний результат деления и остатки.
=2602
Program ff;
var
summ, count_terms:integer;
begin
summ:=0;
count_terms:=0;
while summ<>324 do
begin
summ:=summ+4;
count_terms:=count_terms+1;
end;
Writeln('Кол-во слагаемых: ',count_terms);
readln();
end.
650*3=1950 мб
16-14.9=1.1 гб свободного места
1950-1100=850 мб
Var b: integer;
a: boolean;
begin
a:=true;
if a then b:=4
else b:=-4;
writeln(b)
end.