Помогите срочно пожалуйста задача Паскаль: Предприятие в год выпустило 40000 изделий.

Помогите срочно пожалуйста задача Паскаль: Предприятие в год выпустило 40000 изделий. За счет усовершенствования технологий процесса объем продукции в год возрос на 5 %. Определить, через сколько лет объем продукции станет больше 45000 в год.

Задать свой вопрос
1 ответ
Program __;Var n:Byte;    a:Real;BEGIN  a:=40000;  n:=0;  Repeat    n:=n+1;    a:=1.05*a;  Until (agt;45000);  Writeln(n);END.  
Карина Старова
как то не благовидно вышло
Вера Скупене
Program __;Var n:Byte; a:Real;BEGIN a:=40000; n:=0; Repeat n:=n+1; a:=1.05*a; Until (a>45000); Writeln(n);END.
Олег Нечепельский
Спасибо громадное
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт