|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.12.2009, 11:04 | #1 |
Регистрация: 24.12.2009
Сообщений: 5
|
Задача на проценты (pascal)
В 1985 году урожай ячменя составил 20 ц с га. В среднем каждые два года за счет применения передовых агротехнических приемов урожай увеличивается на 5%. Определить, через сколько лет урожайность достигнет 25 ц с га.
program kolhoz; uses crt; var a:real; b:integer; begin clrscr; a:=20; b:=0; repeat b:=b+2; a:=a+20*0.05; (проблема в этой строчке: что не так?) until a=25; writeln ('Кол-во лет = ',b); readkey; end. |
27.12.2009, 11:22 | #2 | |
АльTRUEи$т
Форумчанин
Регистрация: 19.03.2009
Сообщений: 784
|
Код:
Цитата:
|
|
27.12.2009, 11:29 | #3 |
Регистрация: 24.12.2009
Сообщений: 5
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Банковские проценты (Delphi) | KARUSHEV | Помощь студентам | 10 | 14.06.2011 22:25 |
Проценты | Nitriyc | Microsoft Office Excel | 4 | 05.12.2009 22:02 |
проценты в паскале... | Рамик | Помощь студентам | 2 | 28.05.2009 10:12 |
Проценты в Excel | OKS | Microsoft Office Excel | 3 | 02.03.2009 15:04 |
Проценты... | Siver | Microsoft Office Excel | 2 | 20.12.2008 08:57 |