24 балла!!! Задача по информатике рост ребёнка 120 см. каждый месяц увеличивается ** 2%....

Question

24 балла!!! Задача по информатике рост ребёнка 120 см. каждый месяц увеличивается на 2%. какой будет рост ребенка через N месяцев введеной клавиатуры. решить через -Repeat; For;

Comments

6 б

---

так что?

---

я не знаю информатику...))

---

жаль

---

надеюсь, тебе ответят

---

Через репит или через фор

---

двумя способами

---

ну или хотя бы одним

---

Данные для проверки есть?

---

нетт

Answer 1

Var n: integer;
var heigth: real;
begin 
  heigth := 120; 
  writeln('n = '); 
  readln(n); 
  for var i := 1 to n do   
    heigth := heigth * 1.02; 
  writeln('Heigth = ',heigth);  
end.

var n: integer;
var heigth: real;
begin 
  heigth := 120; 
  writeln('n = '); 
  readln(n); 
  repeat   
  begin     
    heigth := heigth * 1.02;     
    n := n - 1   
  end   
  until n = 0; 
  writeln('Heigth = ',heigth);  
end.

Comments

хз, че тут сложного...

---

ну

---

нориально