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

nastyaswan1405 nastyaswan1405    3   30.08.2019 20:30    1

Ответы
sako9910 sako9910  06.10.2020 05:41
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика