В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
59494920948583
59494920948583
16.12.2020 07:17 •  Информатика

1. реши : сгенерируй последовательность случайных чисел, которые принадлежат промежутку [1..100], выведи их на экран и посчитай количество четных чисел. 2. реши : вывести на экран таблицу значений функции y=(x2+x3)/(x5). количество значений вводится. начальное значение х = -1, значение аргумента выводится с шагом h=1. 3. 2, с. 90(рт)

Показать ответ
Ответ:
vs12
vs12
20.08.2022 13:43

if M[a, 4+1-a] < M[min, min]

 then min := M[a, 4+1-a]

- у тебя в матрице рандомные числа максимум до 10, ты назначаешь их в min и max, а потом эти min и max пытаешься использовать как индексы.

Заведи отдельные переменные для сохранения индексов, например imin и imax и пользуйся ими, например как-то так:

for a := 1 to 4 do

if M[a, 4+1-a] < M[imin, imin]

 then begin

                      min := M[a, 4+1-a];

                      imin := a;

                end


По поводу параметра цикла не уверен, возможно в Pascal.ABC есть какие-то особенности по сравнению с обычным паскалем. Нашел вот такое:

"Описание параметра цикла for в заголовке цикла соблюдает принцип локальности: переменная описывается в том месте, где она впервые понадобилась


begin

 for i: integer := 1 to 9 do

   write(i,' ');

 // Здесь переменная i не доступна!

 for var i := 9 downto 1 do // описание с автоопределением типа

   write(i,' ');

end."

0,0(0 оценок)
Ответ:
evasuperpuper123
evasuperpuper123
10.11.2020 08:48
Некоторые условияСкорее, главное условие - это чётность игр. Поскольку в партии играет по двое, то сумма чисел должна быть чётной. Код

#include <iostream>

using namespace std;

int main()

{

   unsigned int x, y, z;

   cin >> x >> y >> z;

   if((x + y + z) % 2 == 0){

       if((3*z + 2 >= x + y) || (3 * x + 2 >= y + z) || (3 * y + 2 >= x + z)){

           cout << "YES";

           return 0;

       }

   }

   else{

       cout << "NO";

       return 0;

   }

   return 0;

}

Проверка

2 2 2                                                                                                

YES

3 1 2                                                                                                

YES

1 1 1                                                                                                

NO

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