Здравствуйте, гость ( Вход | Регистрация )
| Sanek |
14.9.2008, 8:40
Сообщение
#1
|
|
Новичок ![]() Группа: Продвинутые Сообщений: 4 Регистрация: 14.9.2008 Город: Красноярск Вы: студент |
пожалуйста помогите решить задачку:
написать программу расчета конечной суммы и сравнения полученого результата с контрольным значением. число членов вводится с клавиатуры с защитой от возможного неверного ввода данных: вид суммы: 1+3+5...+(2*N-1) и контрольное значение N*N вот что у меня получается: var a.b,i:integer; N:real; a=0 for i:=1 to N do a:=(2N-1)+a; b:=N*N; writlen(a); writlen(b ); .....a дальше я не знаю что делать,помогите пожалуйста кто может. (IMG:style_emoticons/default/unsure.gif) |
Sanek расчет конечных сумм 14.9.2008, 8:40
Inspektor
var
a.b,i:integer; N:real;
a=0
for i:=1 to N do... 14.9.2008, 9:03
Sanek спасибо,в дальнейшем буду по внимательней :bigwink... 14.9.2008, 13:48![]() ![]() |
|
Текстовая версия | Сейчас: 19.4.2026, 2:42 |
Зеркало сайта Решебник.Ру - reshebnik.org.ru