• Предмет: Информатика
  • Автор: nikitinroman22122004
  • Вопрос задан 7 лет назад
< >

составить программу с помощью for var ...

Приложения:

Ответы

Ответ дал: fedrfedr
0

var

 m: Real;

 i: Integer;

begin

 m := 1.5;

 for i := 1 to 7 do begin

   WriteLn (i, ' сентября количество биомассы составляет ', m:10:7, ' т' );

   m := m * 1.3;

 end;

end.


Похожие вопросы
Русский язык
2 года назад
Объясните написание деепричастий. Лиса мышковала. Она становилась вдыбки, извиваясь, прыгала вверх и, припадая на передние лапы, рыла ими, окутываясь сияющей серебряной пылью, а хвост её, мягко и
Русский язык
2 года назад
продолжить рифму дождик вылился из тучки протянул я к тучке ручки.хотя-бы еще две строчки не могу придумать
Математика
2 года назад
Найдите по формуле S= v×t если v=206 t=25
Қазақ тiлi
2 года назад
Нүктенің қойылу себебін анықтаңыз. Тұлданған күн. Ауыл. Үш саны сиырма шақты.​
Математика
8 лет назад
Округлите дроби: а)1,69; 1,198; 37,444; 37,5444; 802,3022 до целых б)0,3691;0,8218; 0,9702; 81,3501 до десятых Помогите пж дам 15балов
Математика
8 лет назад
При каком значении А значение выражения 74а-12(5а+1/2) равно 1
Литература
9 лет назад
значение слова ветхий,незримый
Математика
9 лет назад
реши блиц турнир (запиши выражение и сделай таблицу к задачам)