Начав тренировки, лыжник в первый денек пробегал 10 км.В каждый последующий

Начав тренировки, лыжник в первый день пробегал 10 км.
В каждый следующий денек он увеличивал длину пробега на 10% от предыдущего денька. Определить, в какой денек он пробежит 20 км.

Составить программку в паскале.

(Оператор Цикл. Цикл с предусловием.)

Задать свой вопрос
1 ответ
Вариант номер 1:
 
program c1ba;
var a:byte;   
p:real;
begin
p:=10;
a:=1;

repeat begin
p:=p+(p/10);
a:=a+1;
end;
until pgt;=20;

writeln('a=',a);
end.


Вариант номер 2:
program c1ba;
var a:byte;   
p:real;
begin
p:=10;
a:=1;
while plt;=20 do begin
p:=p+(p/10);
a:=a+1;
end;

writeln('a=',a);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт