Проверьте правильность программы на Паскале

[Женек1]

Проверьте правильность программы на Паскале

Выбрать алгоритм, составить блок-схему и программу для вычис-
ления в точках xi = a + i×h, i = 0,1,2…,n, h = (b – a)/n промежутка [a,b]
наибольшего и среднего значений функции y = f(x)
предусмотреть ввод исходных данных a, b, n с клавиатуры;

 

[Vladimir_S]

Проверьте правильность программы на Паскале

Ну и где программа?

 

[Gampos]

Хм, есть онлайн сервисы проверки таких уравнений, не помню названия, года 4 назад пользовался, уверен до сих пор функционируют.

 

[Женек1]

Проверьте вот эту программу пожалуйста)

Вот задание:Найти число М натуральных чисел n, таких, что ni^2+ni^3 < = N, где N - заданное натуральное число. i - это индекс
Вот программа:
Код Pascal
var
M,i,N,ni:integer;
begin
readln(N);
for i:=1 to N do
(sqr(ni)+(sqr(ni)*ni)) <= N;
writeln(M);
readln;
end.

 

[Женек1]

извените за беспокойство но я уже сам разобрался с этой программой спасибо )
вот так она должна быть
var
M,i,N:integer;
begin
writeln(' Ââåäèòå N');
readln(N);
M:=0;
for i:=1 to N do
if sqr(i)+sqr(i)*i<= N then inc(M);
write(M);
readln;
end.