Ce
5 год назад
32 балла!!! Задание по информатикерост ребёнка 120 см. каждый месяц увеличивается на 2%. какой будет рост ребенка через N месяцев введеной клавиатуры. решить через -Repeat; For;
ОТВЕТЫ
King Peter
Oct 24, 2020
UsesCRT;
Var n,i:integer;
var size,m:real;
begin
size:=120.0
m:=1.02
ClrScr;
readln(n);
for i:=0 to n do
begin
size:=size*m;
end;
writeln('Children size: ', size);
end.
Var n,i:integer;
var size,m:real;
begin
size:=120.0
m:=1.02
ClrScr;
readln(n);
for i:=0 to n do
begin
size:=size*m;
end;
writeln('Children size: ', size);
end.
70
Смежные вопросы:
