Здравствуйте! Помогите пожалуста,никак не могу вспомнить общую формулу для нахождения х. А задача такая: 1 грамм конфет стоит ..(вводим число с клавиатуры). сколько стоит 100,200...1000г ? мне нужна только общая формула. (все делать в pascal abc) заранее спасибо)
Тут не нужно помнить. 100 грамм стоят X * 100 (X -- введённое число) 200 грамм -- X * 200 И так далее. В чём трудность?
Ну, логично, что это X * Y, где Y -- это 100, 200, 300 или что там у вас. А X -- число, введённое с клавиатуры. Перебирать Y можете циклом for.
Так вам нужен код или формула?
ну в общем вот.. program a; var x:real; i:integer; begin readln(x); for i:=100 to 1000 do begin x:=???; - вот эту формулу end; writeln(x); end.
Заведите отдельную переменную y, в цикле каждый раз присваивайте ей значение y := x * i. Там же её и выводите.
Правильно ли я понимаю, что вам нужно для каждого числа 100, 200, 300, ..., 1000 вывести стоимость? Или нужно вывести суммарную стоимость?
для каждого числа
Тогда writeln(y) делать нужно внутри цикла.
спасибо!
Можете без y. Просто внутри цикла написать writeln(x * i);
Спасибо!)