29.04.2013, 10:53 | #1 (permalink) |
Member
Регистрация: 16.03.2013
Сообщений: 18
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Проверьте правильность программы на Паскале
ления в точках xi = a + i×h, i = 0,1,2…,n, h = (b – a)/n промежутка [a,b] наибольшего и среднего значений функции y = f(x) предусмотреть ввод исходных данных a, b, n с клавиатуры; |
29.04.2013, 10:53 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Данные ссылки могут раскрыть ваши глаза на решение проблемы Проверьте правильность сборки Программы на Паскале, уравнения Проверьте правильность программы на паскале Проверьте правильность программы на паскале |
12.05.2013, 13:13 | #4 (permalink) |
Member
Регистрация: 16.03.2013
Сообщений: 18
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Проверьте вот эту программу пожалуйста)
Вот задание:Найти число М натуральных чисел 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. |
12.05.2013, 13:17 | #5 (permalink) |
Member
Регистрация: 16.03.2013
Сообщений: 18
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
извените за беспокойство но я уже сам разобрался с этой программой спасибо )
вот так она должна быть 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. |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|