В смысле результат, который выдает твоя программа порой является чушью не совместимой с истиной, так понятнее ?
Точно. Извенняюсь. Там я забыл begin и end написать.
if a[i]<n then
BEGIN
s:=s+a[i];
inc(k);
END;
end;
Сообщение отредактировано: TimeStopper -