|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
11.10.2010, 23:11
|
#1 |
|
Пользователь
Регистрация: 11.10.2010
Сообщений: 49
|
TP-цикл
дана последновательность "бред.jpg"
Нужно составить программу. Вот что у меня получилось.Исправтье пожалуйста! Var n,s,i:real; Begin Writeln('Vvedit n'); readln(n); s:=0; i:=1; while 1<n do Begin s:=sqrt(3*(n-1)+s); i:=i+1; end; Writeln('n=',n); end. |
|
|
|
11.10.2010, 23:23
|
#2 |
|
ТАМБОВСКИЙ ВОЛК.
Участник клуба
Регистрация: 16.03.2010
Сообщений: 1,354
|
にんじゃ
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Цикл | Joker<777> | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 30.09.2010 16:05 |
| Цикл по времени - Как сделать так чтобы цикл выполнялся к примеру 10 секунд ? | Anarki | Общие вопросы C/C++ | 3 | 13.11.2009 19:23 |
| i,j и цикл | Juffin | Свободное общение | 13 | 29.04.2009 14:36 |
| Цикл с предусловием. ( цикл while) Цикл с постусловием. (цикл repeat ... until) | Mr.User | Помощь студентам | 9 | 23.11.2007 01:34 |
