Для каждого сообщения укажите информативно ли оно для участника олимпиады по информатике.1. бит-единица измерения информации 2. процессор--устройство обработки информации3. псевдоструктуры образуют когомологии​

100

Объяснение:

var b: array of real;

i,n,ll: integer;

max,min,a: real;

begin

write('Введите длину массива: ');

readln(n);

write('Введите число a: ');

readln(a);

setlength(b,n);

writeln('Массив B: ');

for i:=0 to n-1 do

begin

b[i]:=random(3*n);

write(b[i],' ');

end;

writeln;

min:=b[0];

max:=a;

for i:=0 to n-1 do

if min>b[i] then min:=b[i]

else if max<b[i] then begin

max:=b[i];

ll:=i;

end;

writeln('Наименьший элемент массива - ',min);

writeln('Элемент, больший числа ',a,' - ',max,' - находится в ',ll+1,' месте');

end.

Можете вместо real типа данных использовать также и integer. Просто неизвестно какие данные будут использоваться во время проверки

Решение:

#include <stdio.h>

#include <math.h>

#include <locale.h>

int main()

{

setlocale(LC_ALL, "rus");

int i, god, obl1, obl2, z, itog;

obl1 = 100000;

obl2 = 200000;

printf("Введите сколько лет происходит модернизация:\n");

scanf_s("%i", &god);

for (i = 1; i < god; i++)

{

 if (obl2 > obl1)

 {

  z = obl1 + obl2;

  obl1 = z;

 }

 else

 {

  z = obl1 + obl2;

  obl2 = z;

 }

 itog = obl1 + obl2;

}

if (obl2 > obl1)

{

 printf("Наибольший доход у второй области: %2d сентиннеалей\n", obl2);

}

else

{

 printf("Наибольший доход у первой области: %2d сентиннеалей\n", obl1);

}

printf("Общий доход за %2d лет : %2d сентиннеалей\n", god, itog);

getchar(); getchar();

}

Прикрепил пару тестов и саму программу, если интересно