Есть ответ 👍

Вфайле f заменить все нулевые компоненты значением суммы первой и последней компонент файла; все отрицательные компоненты уменьшить на значение суммы, а также найти среднее арифметическое положительных компонент. результаты отпечатать.

266
284
Посмотреть ответы 2

Ответы на вопрос:


Uses crt; var  ksl,ksm: longint; a: array of integer;   i,sred,k: integer;     f: text; s: string; begin clrscr;     assign(f,'f1.txt'); reset(f); //из файла   while not eof(f) do        begin     readln(f,s);       ksm: =ksm+length(s); //считаем все символы      end;   writeln(ksm);     reset(f);   for i: =1 to ksm do            begin              if (s[i]=' ') then                      ksl: =ksl+1; //считаем все слова        end;   writeln(ksl);   reset(f); //из файла setlength(a,ksl+1);   for i: =1 to ksl do        begin            read(f,a[i]);         end; close(f); for i: =1 to ksl do          begin            if (a[i]=0) then a[i]: =a[1]+a[ksl]; // '' все нулевые компоненты значением суммы первой и последней компонент файла''         if (a[i]> 0) then               begin                        sred: =sred+a[i]; // ''найти среднее арифметическое положительных компонент''                        inc(k);                 end;                 if (a[i]< 0)then a[i]: =a[i]- abs( a[1]+a[ksl] );   // ''все отрицательные компоненты уменьшить на значение суммы''          end; rewrite(f); //в фаил for i: =1 to ksl do      begin                  write(f,a[i],' ');             end; close(f);   writeln(' sred= ',sred/10: 0: 1); end.
Yury28
4,6(97 оценок)

#include < iostream.h> #include < math.h> using namespace std; int main() {        int x,y,z;         cout < < "vvedite x: " < < endl;         cin > > x;         cout < < "vvedite y: " < < endl;         cin > > y;         z: =x*4-(x*3+y*2);         cout < < "otvet: " < < z < < endl;         return 0; }

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS