М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
sadernik2
sadernik2
08.06.2020 13:37 •  Информатика

Что такое рекурсивная подпрограмма в pascal?

👇
Ответ:
egorkashoshin0
egorkashoshin0
08.06.2020
Это такая, которая вызывает сама себя. Например, её имя (по ходу, в паскале подпрограммы называются процедурами, ну это не суть принципиально) имеет имя РР, так вот в самом её тексте происходит вызов РР.
По ходу, не только к паскалю относится, вообще к любому языку.
4,5(43 оценок)
Открыть все ответы
Ответ:
Fobsliza
Fobsliza
08.06.2020

Program Maslovaalisa;
const n=7;
var last: array[1..n] of integer;
var new: array[1..n] of integer;
i: integer;
begin
  writeln('');
  for i:=1 to n do
  begin
    writeln('Введите температуру за ',i,'-й день недели: ');
    write('  - в году  ');readln(last[i]);
    write('  - в этом году  ');readln(new[i]);
   end;
  writeln('*** alphaues is thinking... ***');
  writeln();
  for i:=1 to n do
  begin
    if last[i] > new[i] then
writeln('В ',i,'-й день недели в году было теплее, чем в этом. Бр-р-р...')
    else
      if last[i] < new[i] then
writeln('В ',i,'-й день недели в году было холоднее, чем в этом. Уф-ф-ф...')
        else
writeln('Удивительно! В ',i,'-й день недели в году была такая же температура, как в этом!');
  writeln('');
  end;
end.

4,8(9 оценок)
Ответ:
Klobutska
Klobutska
08.06.2020

Задача1

массив определи как array[];

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

int n;

array [n];

int answer;

for (i=0, i < n, i++)

{

     if (array[i] == 2)

         answer++;

std::cout<<answer;

Как то так

 

Задача2 

 

array[n];

 

 

for (int i =1, i < n, i++)

{

 if (array[0] >= array[i])

    array[0] = array[i];

}

std::cout << array[0];

//Это было решение первого пункта

int first;

int last

bool positive;

while (positive == false )

{

   for (int i = 0; i < n; i++)

     {

        if (array[i] > 0)

        {

          positive = true;

          first = i;

          array[i] = -1;

      }

}

while (positive == false )

{

   for (int i = 0, i < n, i++)

     {

        if (array[i] > 0)

        {

          positive = true;

          last = i;

      }

}

 

 

int summ

for (int i = first, i < last, i++)

{

  summ += array[i];

}

 std::cout<<summ; // ответ на 2 пункт

// ПРеобразую

newarray [n];

int a = 0;

for (int i = 0, i < n, i++)

{      

 if (array[i] == 0)  

   {      

newarray[a] = array[i];      

 a++;      

    }  

for (int i = 0, i < n, i++)

{    

     if (array[i] != 0)    

         {        

          newarray[a] = array[i];

         a++;

        }

}

std::cout<< newarray;

4,8(19 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ