Ребята, помогите, пожалуйста)1) Начав тренировки, спортсмен в первый денек пробежал 10 км.

Ребята, помогите, пожалуйста)
1) Начав тренировки, спортсмен в первый денек пробежал 10 км. Каждый следующий денек он увеличивал норму на 10 % от нормы предшествующего денька.Найти через сколько дней его норма превзойдет 20 км.
2) Винни Пух прогуливается на деньки рождения. На 2-ух первых днях рождениях у Пяточка и Зайчика он съел по 100 гр пищи. На каждом последующем деньке рождения Винни Пух съедает столько же пищи, что и на 2-ух прошлых. Составить таблицу, определяющую сколько кг еды Винни Пух съест на 15 деньке рождения.

Задать свой вопрос
Амелия Крапоткина
Все в паскале написать
1 ответ
1. uses crt;
var k:integer;
a:real;
begin
clrscr;
a:=10;
k:=1;
while alt;=20 do
      begin
      a:=a+a*10/100;
      k:=k+1;
      end;
writeln ('Норма превзойдет 20 км на ',k,' денек');
end.
     
2.
uses crt;
var k:integer;
m:array [1..15] of real;
begin
clrscr;
m[1]:=0.1;
m[2]:=0.1;
for k:=3 to 15 do
    begin
    m[k]:=m[k-1]+m[k-2];
    end;
for k:=1 to 15 do
writeln (k:3 ,' денек',m[k]:8:1,' кг');
end.

Нина Имандосова
Спасибо огромное!!!))
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт