Рассчитать значение функции

@Лисёныш · Регистрация: 30.03.2010

Студворк — интернет-сервис помощи студентам

Дана задача: Рассчитать значение функции V = A * B + (A / (3 * B)) - 4 , где а изменяется на заданном интервале с заданным шагом, и b изменяется на заданном интервале с заданным шагом.

И код, но в коде ошибка какая-то, но не могу понять в чем!

PureBasic

CLS                                                                           
INPUT "Начальное значение переменной А,B", NA, NB                             
INPUT "Конечное значение переменной A,B", KA, KB                              
INPUT "Шаг, с которым изменяется значение А,B", GA, GB                        
FOR A = NA TO KA STEP GA                                                      
FOR B = NB TO KB STEP GB                                                      
V = A * B + (A / (3 * B)) - 4                                                 
PRINT "при A="; A, "и B="; B, " V="; V    
next A,B
end

@кот Бегемот · 29.10.2010, 19:38

PureBasic

CLS
INPUT "Начальное значение переменной А,B", nA, NB
INPUT "Конечное значение переменной A,B", KA, KB
INPUT "Шаг, с которым изменяется значение А,B", GA, GB
FOR a = nA TO KA STEP GA
FOR b = NB TO KB STEP GB
V = a * b + (a / (3 * b)) - 4
PRINT "при A="; a, "и B="; b, " V="; V
NEXT
NEXT
 
END

Вот так всё работает

@Лисёныш · 29.10.2010, 19:40 **[ТС]**

спасибо работает =))

@Shkap · 13.11.2010, 18:50

а у тебя была ошибка, по моему, в том что если бы и писать next то сначала b нужно было поставить, а уже потом a

@linke · 16.11.2010, 19:41

помогите, в чем ошибка?
....
1 : print "cколько всего материков?"
input a$
if a$="6" then print "правильно" else print "попробуй ещё раз " goto 1
...
пишет что Ожидается: ,/;/конец выражения

@Shkap · 16.11.2010, 22:46

Сообщение от linke

помогите, в чем ошибка?
....
1 : print "cколько всего материков?"
input a$
if a$="6" then print "правильно" else print "попробуй ещё раз " goto 1
...
пишет что Ожидается: ,/;/конец выражения

в чем ошибка не знаю но могу посоветовать немного другой код

PureBasic

do
print "сколько всего материков?"
input a$
if a$=5 then print "правильно" else print "неправильно, попробуй еще"
loop until a$="6"

з.ы. не на всех бейскиах поддерживается русский язык, так что пиши лучше translitom.

@softmob · 17.11.2010, 07:26

Сообщение от Shkap

в чем ошибка не знаю но могу посоветовать немного другой код

PureBasic

do
print "сколько всего материков?"
input a$
if a$=5 then print "правильно" else print "неправильно, попробуй еще"
loop until a$="6"

з.ы. не на всех бейскиах поддерживается русский язык, так что пиши лучше translitom.

у тебя тоже с ошибкой, выходишь из цикла когда 5 материков а не 6, и если решил строковые символы использовать, то в проверке 5 в ""

PureBasic

CLS
DO
    INPUT "ckolko vsego materikov"; a
    IF a = 6 THEN PRINT "pravilno" ELSE PRINT "poprobuj ewjo raz"
LOOP UNTIL a = 6

Добавлено через 17 минут
Перепутал, выходишь правильно, но будет писать не тот ответ, ну и в проверке над "6".

10.02.2011, 15:45

подскажите, что значит ошибка "повторяющееся определение"?
переменную я описала один раз, хотя если удалить строчку с описанием совсем - та же ошибка. имя переменной alf, но от смены имени тоже толку нет.
и как описать функцию (в начале написано "declare function rk! ()")?

@Quiet Snow · 11.02.2011, 01:07

"повторяющееся определение"

Будьте добры предоставьте код.

11.02.2011, 08:02

вот его часть с альфой:

QBasic/QuickBASIC

DIM ALF AS DOUBLE
ALF = 0
DO UNTIL I = 25
T1 = T * T0
B = (1 - NU0) * NU0 * PU
T10 = .5 * (-B + SQR(B ^ 2 + 300 * (NU0 ^ 2) * PU0)) / (GZ * T0)
Z = A1 * (TAU / T0 - T10)
ALF = -.4 * EXP(-Z) * (1 - EXP(-Z ^ 2))

ну и дальше еще много чего.

@кот Бегемот · 11.02.2011, 11:09

Людмила Теламон, а что, свою тему влом завести, надо в чужую обязательно влезть со своими проблемами, не имеющими отношения к теме. Правила читай.

@Лисёныш 3 / 3 / 0 Регистрация: 30.03.2010 Сообщений: 60
	29.10.2010, 19:40 [ТС]	3
	спасибо работает =)) 0

@Shkap Оранжевый портфель. 60 / 58 / 47 Регистрация: 13.11.2010 Сообщений: 459
	13.11.2010, 18:50	4
	а у тебя была ошибка, по моему, в том что если бы и писать next то сначала b нужно было поставить, а уже потом a 0

@linke 0 / 0 / 0 Регистрация: 16.11.2010 Сообщений: 7
	16.11.2010, 19:41	5
	помогите, в чем ошибка? .... 1 : print "cколько всего материков?" input a$ if a$="6" then print "правильно" else print "попробуй ещё раз " goto 1 ... пишет что Ожидается: ,/;/конец выражения 0

Людмила Теламон
	10.02.2011, 15:45	8
	подскажите, что значит ошибка "повторяющееся определение"? переменную я описала один раз, хотя если удалить строчку с описанием совсем - та же ошибка. имя переменной alf, но от смены имени тоже толку нет. и как описать функцию (в начале написано "declare function rk! ()")?

@Quiet Snow 4973 / 1645 / 409 Регистрация: 25.04.2010 Сообщений: 4,538 Записей в блоге: 1
	11.02.2011, 01:07	9
	"повторяющееся определение" Будьте добры предоставьте код. 0

@кот Бегемот Платежеспособный зверь 8861 / 4290 / 1629 Регистрация: 28.10.2009 Сообщений: 11,451
	11.02.2011, 11:09	11
	Людмила Теламон, а что, свою тему влом завести, надо в чужую обязательно влезть со своими проблемами, не имеющими отношения к теме. Правила читай. 0

Опции темы

Рассчитать значение функции

Решение