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

Какие изменения нужно внести в программу из примера 17.3, чтобы получить следующее изображе-
ние? Функции для изменения интенсивности цвета см.
в примере 17.1.​


Какие изменения нужно внести в программу из примера 17.3, чтобы получить следующее изображе-ние? Фун

Показать ответ
Ответ:
karinroy
karinroy
21.04.2021 19:05

type
  Mas = array [1..5, 1..10] of integer; //Объявляем тип массива

 

var
  m: Mas;  //Переменная типа массива
  i, j: integer;  //Переменные для цикла

 

procedure CubeMas(var m: Mas); //Процедура возведения в куб
var
  i, j: integer;  //Локальные переменные цикла в процедуре

begin
  write('Измененный массив: ');
  for i:= 1 to 5 do
    for j:= 1 to 10 do
    begin
      m[i, j]:= sqr(m[i, j]) * m[i, j];  //Возводим элемент массива в куб
      write('m[', i, ', ', j, '] = ', m[i, j], '  ');  //Печатаем элемент массива
    end;  //Конец цикла
  writeln;  //Перевод на новую строку
end;  //Конец процедуры

 

begin
  write('Исходный массив: ');
  for i:= 1 to 5 do
    for j:= 1 to 10 do
    begin
      m[i, j]:= random(40) - 20;  {Присваиваем элементу массива случайное значение из промежутка [-20, 20] }
      write('m[', i, ', ', j, '] = ', m[i, j], '  ');  //Печатаем элемент массива
    end;  //Конец цикла
  writeln;  //Перевод на новую строку
  CubeMas(m);  //Вызываем процедуру возведения в куб
end. //Конец программы

0,0(0 оценок)
Ответ:
djdkdksDkskd
djdkdksDkskd
07.12.2020 19:02

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

               Г             И               К             Р              У

1.                                             1                             3

2.            4                                                              5

3.            4                               1

4.                            2                             1

5.            1              5

 

Если мы предположим в первом высказывании, что правда - это Китай на 1 месте, то проследив дальше, мы столкнемся, что украина и италия должны быть одновременно на 5, а этого быть не может.

Тогда предполагаем, что в первом высказывании верно утверждение - украина на 3 месте и все выстраивается:

1 место - Россия, 2 место - Китай, 3 место - Украина, 4 место - Германия, 5 место - Италия.

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