Задание:
Практичекая по информатики. Помогите пожалуйста 1. Какие значения будет принимать величина- счетчик при выполнении следующего цикла: от f=100 до 1000 шаг a2. Количество рыбы в реке, в которую сбрасывались загрязнения, ежегодно сокращалось на 20%. Определить, через сколько лет в реке почти не останется (ее количество будет меньше 1) рыбы? Извеcтно, что до начала загрязнения ее было N особей.
Решение:
2. program x; var N,y: integer; beginreadln (N); while N>0 dobegin N: =N — (N div 5); y: =y+1; end; writeln (y); end.
Знаете другой ответ?