Информатика 8 класс паскаль даю 30 баллов
Приложения:
rightqwer12:
скинь данные которые будут вводится и какой ответ должен быть
не знаю если честно, зажали просто решить через паскаль эту задачу
у тебя ниже там видно цифры может быть и есть то что я спршивал
там другая задача, которую тоже надо решить, сейчас тоже поставлю
Ответы на вопрос
Ответил rightqwer12
1
Ответ:
Program qq;
var a,b,c: real;
var i:integer;
begin
writeln('Введите запас рыбы, план отлова, наименьший запас рыбы ');
readln(a,b,c);
while(a > c) do
begin
a:= a * 1.15;
a:= a - b;
inc(i);
end;
write('План выдержал ',i, ' лет');
end.
Новые вопросы