SOS-SOS!!!!! Решите пожалуйста!!!!! 11 класс - нужны хорошие оценки. 1-ая решена.

SOS-SOS!!!!! Решите пожалуйста!!!!! 11 класс - необходимы превосходные оценки. 1-ая решена. Нужна 2.

Задать свой вопрос
Николай
Есть какой-или ввод и откуда брать значение "концентрации бактерий"?
Шифлян Анжелика
из первой задачки все числа
Косиков Владислав
beginvar i:integer;for i:= 1 to 7 doWriteln('1 Денек - ', (350.0+random(124)):0:0);end.
Хахуцкий Ванек
это все?
Виолетта Соозар
упс, Writeln(i,' День - ', (350.0+random(124)):0:0);
Полина Непомнющина
я не могу осознать само задание, где брать концентрацию то?
Владислав Булашков
ага, все, отыскал, сейчас перепишу, если смогу
Лилия Синецкая
пожалуйста-пожалуйста!!
Гена Перехов
Блин, вас принуждают по инфе че то делать, у нас последние 4 года просто в телефон играют ;c отыщешь косяк - напиши
1 ответ
Как то так
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программка не работает, обновите версию!

begin
var i:integer;
var ur1:=ReadReal('ur1 =');
var ur2:=ReadReal('ur2 =');
var p:=ReadReal('p = ');
for i:= 1 to 7 do
begin
Writeln(i,' Денек - ',ur1 - ur1*p/100:0:0);
ur1:=ur1 - ur1*p/100;
end;
end.
Евгений Лорисов
Спасибо. Очень помогли)
Artjom Kalsin
все работает. ура
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт