![]() |
Здравствуйте, гость ( Вход | Регистрация )
![]() |
Sanek |
![]()
Сообщение
#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) |
![]() ![]() |
Inspektor |
![]()
Сообщение
#2
|
Аспирант ![]() ![]() ![]() Группа: Активисты Сообщений: 384 Регистрация: 11.6.2008 Город: Крыжополь Учебное заведение: БГТУ Вы: студент ![]() |
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) (IMG:style_emoticons/default/newconfus.gif) . Ого... 1) Где begin, end? 2) Что такое "writlen"? 3) С какого перепоя "N:real"? 4) Где чтение переменной N с клавиатуры? 5) В цикле используется не та переменная: for i:=1 to N do a:=(2N-1)+a; Ну и просто ничтожные после такого поправки: 1) Пишем внимательно, опечаток слишком много. 2) Используйте integer по назначению, вам нужен без знаковый тип. 3) Переменная b не нужна. Ответьте строго по пунктам. |
Sanek |
![]()
Сообщение
#3
|
Новичок ![]() Группа: Продвинутые Сообщений: 4 Регистрация: 14.9.2008 Город: Красноярск Вы: студент ![]() |
спасибо,в дальнейшем буду по внимательней (IMG:style_emoticons/default/bigwink.gif) (IMG:style_emoticons/default/smile.gif)
|
![]() ![]() |
![]() |
Текстовая версия | Сейчас: 25.5.2025, 23:37 |
Зеркало сайта Решебник.Ру - reshebnik.org.ru