program Test;
var i,s : Int32;
begin
s:=0;
for i:= 100 to 999 do
begin
if (i mod 8 = 0) or (i mod 9 = 0) then
begin
writeln(i);
s:=s+i;
end;
end;
write('Summ: ');
writeln(s);
end.
program Test;
var i,s : Int32;
begin
s:=0;
for i:= 100 to 999 do
begin
if (i mod 8 = 0) and (i mod 9 = 0) then
begin
writeln(i);
s:=s+i;
end;
end;
write('Summ: ');
writeln(s);
end.
program Test;
var i,c,s : Integer;
begin
i:=2;
s:=0;
c:=i*8*9;
while c<1000 do
begin
writeln(c);
inc(i);
s:=s+c;
c:=i*8*9;
end;
write('Summ: ');
writeln(s);
end.
Какие то у вас неправильные понятия о сложной логике - вот заказ пиццы через интернет по собственному рецепту - это сложная логика. А всю математику можно вывести на сторону клиента в JavaScript. Если в друг какая то сложная математика нужна - можно вынести в другой язык, более подходящий для решения задачи, на отдельный сервис, а с него забирать готовые данные через запросы Ajax.
Хотя я бы оставил расчет на стороне клиента - клиентов много, и каждому если на сервере расчеты делать - никакого сервера не хватит(да и положить его проще простого будет).
Да - есть такой косяк у MS - в безопасном режиме можно стать владельцем любого файла(локальный админ имеет максимальные права) и групповая политика будет локальной, которую локальный админ сможет поменять.
