IPB

Здравствуйте, гость ( Вход | Регистрация )

> расчет конечных сумм, задача на Pascal
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)
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 
Ответить в эту темуОткрыть новую тему
Ответов(1 - 2)
Inspektor
сообщение 14.9.2008, 9:03
Сообщение #2


Аспирант
***

Группа: Активисты
Сообщений: 384
Регистрация: 11.6.2008
Город: Крыжополь
Учебное заведение: БГТУ
Вы: студент



Цитата(Sanek @ 14.9.2008, 12:40) *

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
сообщение 14.9.2008, 13:48
Сообщение #3


Новичок
*

Группа: Продвинутые
Сообщений: 4
Регистрация: 14.9.2008
Город: Красноярск
Вы: студент



спасибо,в дальнейшем буду по внимательней (IMG:style_emoticons/default/bigwink.gif) (IMG:style_emoticons/default/smile.gif)
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия Сейчас: 25.5.2025, 16:49

Книжки в помощь: "Сборник заданий по высшей математике" Кузнецов Л.А., "Сборник заданий по высшей математике" Чудесенко В.Ф., "Индивидуальные задания по высшей математике" Рябушко А.П., и другие.




Зеркало сайта Решебник.Ру - reshebnik.org.ru