![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
webgirl |
![]()
Сообщение
#1
|
Гость ![]() |
вычислить следующую сумму и определить, при каком n произойдет переполнение строки
1^2+2^2+3^2+...+n^2 составить программу, кот. возводит число в куб, используя следующее свойство: 1^3=1 2^3=3+5 3^3=7+9+11 4^3=13+15+17+19 (эту я вроде с грехом пополам сделала, но такой бред получился) сост программу для: (((((1?2)?3)?4)?5)?6)=35 заранее очень вам благодарна ![]() |
![]() ![]() |
webgirl |
![]()
Сообщение
#2
|
Гость ![]() |
Цитата При чем здесь строка? вопрос по-другому (как я его понимаю): при каком н количество цифр в искомом значении (искомой сумме) превысит 255 символов. наверно так вот как я решала вторую Код program kub; uses crt; var a,i,j,k,s:integer; begin clrscr; writeln; writeln('vvedite chislo');readln(a); k:=0; for i:=1 to a do begin k := k+(i-1); end; i:= 1; for j := 1 to k do i:= i+2; for j:=a downto 1 do begin s := s + i; i:=i+2; end; writeln(s); readkey; end. но мой препод сказал, что можно решить намного проще и что это полный бред, хотя я мучалась с ней неделю. обидно, однако |
![]() ![]() |
![]() |
Текстовая версия | 20.07.2025 16:05 |