25.04.2010, 23:47
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563
Репутация:
52
|
|
Если правильно понял условие задачи, то вот:
PHP код:
program Pryd;
var
a,b,c,
i,y:integer;
t:Extended; // дробное число
begin
i:=0;
y:=0;
Write('Количиство Рыбы: ');
ReadLn(A);
Write('Отлов Рыбы: ');
ReadLn(B);
Write('Порог "спаривания" Рыбы: ');
ReadLn(C);
While a>1 do
begin
inc(y);
t:=a/100*15; // Вычисляем 15% от всей рыбы
a:=a-b; // вычитаем улов
WriteLn('A - B :', a); // Выводим отлов
if a>c then
begin
a:=round(a+t); // если рыбы больше минимума, добавляем 15% и округляем
WriteLn('A + % :', a); // выводим %
inc(i); // увеличиваем счетчик годиков
end;
end;
writeln('План лет: ',i);
writeln('Рыба исчезнет лет: ',y);
readln; // Ожидаем нажатия Enter для выхода
end.
Последний раз редактировалось JnK; 25.04.2010 в 23:57..
|
|
|