Program getar;
uses crt;
var
S,ur:real;
god:integer;
begin
god:=0;
s:=100; //площадь
ur:=20; // урожайность
while s<=120 do
begin
god:=god+1; // подсчет лет
s:=s+((s/100)*5); // площадь ув. на 5%
ur:=ur+((ur/100)*2);// урожайн. ув. на 2%
end;
writeln('Cherez ',god,' goda ploshad budet bolshe 120 ');
end.
мне трудно объяснять на словах держи программу в ней алгоритм подсчета и тд..
Возрастание: ВБГА
Убывание: БАВГ
Убывание(по цветам): ВБГА
Мда запутано , )))))))))))))))))))})))))))))))
1340+206=1546
MCCCXL+CCVI=CDXLVI
1. <span>Г) Логической
2. </span><span>Б) Формат</span>