помогите пожалуйста решить задачуу 1.Найти сумму всех нечётных трёхзначных чисел. это программа Паскаль

Скоро сверх разум запрограммируют а Вы такую простую задачу не можете решить.

А с Си перевести смогешь? )
int S=0;
for(int i=101; i<1000; i+=2)
S+=i; // аналог S=S+i
printf("S=%d",S); //вывод в консоль как write...

var a,b,i:integer;
begin
b:=0;
for i:=100 to 999 do
begin
a:=i div 2;
if a <> 0 then b:=b+a;
end;
writeln(b);
readln
end.