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

Объясните, что делает данный алгоритм на Pascal:
for i:=1 to n do
begin write('a(',i,')='); readln(a);
if not odd(a) then inc(k);
end;
if k=0 then writeln('нет четных ') else writeln('количество четных...',k);

👇
Ответ:
belbeksev
belbeksev
09.12.2020

Считает количество введенных четных чисел

Объяснение:

4,8(97 оценок)
Открыть все ответы
Ответ:
Антонggez
Антонggez
09.12.2020
Можно декодировать вручную: надо написать вместо каждой буквы - букву, которая в алфавите стоит перед ней (для буквы а - букву я) - это не сложно, например:
о -> н (в алфавите ...мнопр...)
б -> а (в алфавите ...яабвг...)
и т.д. 
Можно с интернет-калькулятора (гyглить по фразе "шифр Цезаря"): ввести исходную фразу и посмотреть, что получится (сдвиг в шифре равен -1 или, что тоже самое, 32)
Наконец, можно написать программу, которая всё сделает для вас.

В любом случае,
об оёу тфеб оёу = на нет суда нет
лпоёч - еёмф гёоёч = конец - делу венец
4,6(7 оценок)
Ответ:

C++

#include <iostream>

#include <ctime>

using namespace std;

void sort(int* arr, int size);

int main()

{

srand(time(0));

int size = 10;//Укажешь SIZE

int* arr = new int[size];

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

{

 arr[i] = 1 + rand() % 50;

 cout << arr[i] << "  ";

}

sort(arr, size);

cout << endl << endl;

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

{

 cout << arr[i] << "  ";

}

return 0;

}

void sort(int* arr, int size)

{

int temp = 1;

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

{

 for (int j = 0; j < size; j++)

 {

  if (arr[i] < arr[j])

  {

   temp = arr[j];

   arr[j] = arr[i];

   arr[i] = temp;

  }

 }

}

}

Объяснение:

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