МихаилКузмичёв
31.08.2022 21:20

Информатмка БЖБ комектесиндерш​


Информатмка БЖБ комектесиндерш​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ТёмаТащер
02.11.2021 19:18
// PascalABC.NET 3.0, сборка 1073
const
  nn=30;
  mm=30;
var
  a:array[1..mm,1..nn] of integer;
  m,n,i,j,k,s:integer;
begin
  Writeln('Введите число строк и столбцов массива: '); Read(m,n);
  Randomize;
  Writeln('*** Исходный массив ***');
  k:=0;
  for i:=1 to m do begin
    for j:=1 to n do begin
      a[i,j]:=Random(51)-25;
      Write(a[i,j]:4);
      if Odd(a[i,j]) then Inc(k)
    end;
    Writeln
  end;
  if k>5 then begin
    Writeln('Средние арифметические отрицательных элементов по строкам');
    for i:=1 to m do begin
      s:=0; k:=0;
      for j:=1 to n do
        if a[i,j]<0 then begin Inc(k); s:=s+a[i,j] end;
      if k>0 then Writeln(s/k:9:5) else Writeln('  0.00000');
    end
  end
  else begin
    Writeln('*** Результирующий массив ***');
    for i:=1 to m do begin
      for j:=1 to n do begin a[i,j]:=2*a[i,j]; Write(a[i,j]:4) end;
    Writeln
    end
  end
end.

Тестовые решения:
Введите число строк и столбцов массива:
8 6
*** Исходный массив ***
 -16  -8  -1  24 -22   1
  -9 -20 -25  13 -11  10
 -15  10 -12  20 -22   3
  -6  25  -3  25 -14  22
  24  -4  24  17  -4 -17
 -23  -9 -22   1 -18 -13
 -12  13   6 -16   2 -13
  19   8 -22  14  -3   4
Средние арифметические отрицательных элементов по строкам
-11.75000
-16.25000
-16.33333
 -7.66667
 -8.33333
-17.00000
-13.66667
-12.50000

Введите число строк и столбцов массива:
3 5
*** Исходный массив ***
   3  24 -21 -22  -8
 -21  14 -22   0 -22
  15 -16  -2   6  22
*** Результирующий массив ***
   6  48 -42 -44 -16
 -42  28 -44   0 -44
  30 -32  -4  12  44
0,0(0 оценок)
Ответ:
Ayshalike
22.01.2020 14:53

#include <stdio.h>

void viewbooks()

{

FILE *f;

char c, word[50]={0};

int k=0,i,n;

if((f=fopen("books.txt","r"))==NULL)

 printf("error");

c=fgetc(f);

n=0;

for(;;)

{

 c=fgetc(f);

 if(c==EOF)

 {

   if(n==0)

   {

     printf("File is empty");

     break;

   }

   printf("date: ");

   for(i=0;i<k;i++)

     printf("%c",word[i]);

   break;

 }

 word[k]=c;

 k++;

 if(c=='"' || c==' ')

 {

   n++;

   if(n==1)

     printf("book 1:\n");  

   if(c=='"' && n%3!=0)

     printf("name: ");

   else if(n%3!=0)

     printf("author: ");

   if(n%3==0)  

     printf("date: ");

   for(i=0;i<k-1;i++)

     printf("%c",word[i]);

   for(i=0;i<k;i++)

     word[i]=0;

   c=fgetc(f);

   if(c==EOF)

     break;

   if(c==' ')

     k=0;

   else

   {

     word[0]=c;

     k=1;

   }

   printf("\n");

   if(n%3==0)

     printf("book %d:\n",n/3+1);

 }

}

fclose(f);

}

int main()

{

viewbooks();

return 0;

}

Пример входных данных(в файле books.txt):

"AAA" X.Y.Xyzf 1234

"Bb" A.V.Ytrewq 7777

"" P.M.Qwerty 1011

"" I.U.Qwerty 1113

Выходные данные:

book 1:

name: AAA

author: X.Y.Xyzf

date: 1234

book 2:

name: Bb

author: A.V.Ytrewq

date: 7777

book 3:

name:

author: P.M.Qwerty

date: 1011

book 4:

name:

author: I.U.Qwerty

date: 1113

Примечания:

В файле books.txt название книги должно быть в двойных кавычках. Название книги, автор и дата отделяются друг от друга только одним пробелом.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота