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

Формирование сложных запросов к готовой базе данных


Формирование сложных запросов к готовой базе данных

👇
Открыть все ответы
Ответ:
Uses crt;
const  n = 15;
var  i, imin, imax, m, min, max, j: integer;
  a: array[1..n]of integer;
begin 
Writeln('Введите числа в массив'); 
for i := 1 to n do   
readln(a[i]); 
for i := 1 to n do   
write(a[i], '   '); 
min := a[1]; 
max := a[1]; 
imin := 1;
imax := 1;  
for j := 1 to n do 
begin   
if(a[j] > max) then  
begin    
max := a[j];     
imax := j;   
end;   
if(a[j] < min) then   
begin     
min := a[j];     
imin := j;   
end; 
end; 
writeln(); 
writeln('индекс минимального элемента ', imin, ' индекс максимального элемента ', imax); 
m := abs(imin - imax); 
Writeln(); 
Writeln('Кол-во элементов между макс. и мин. элементами ', m - 1);
end.
4,8(8 оценок)
Ответ:
marine25
marine25
26.06.2021

Объяснение:

1)У тебя спрашивают b=1? У тебя дано b=3, значит b!=1. Если нет, то переходим к следующим указаниям: с=с-b=4-3=1, b=b+c=3+1(Потому что в предыдущем шаге мы дали новое значение для c, вернее произвели математическую операцию с ним. Возвращаемся(Слева линия) снова к логическому условию. Я честно говоря ХЗ, что они тут имели ввиду, но после того, что я описал c=1,но если мы продолжим проверку b=1, то c начнет принимать отрицательные значения. Цикл вышел, как мне кажется.

Теперь мне лень расписывать - держи фото/скрины

Не знаю, что у тебя за язык программирования, но я сделал тоже самое на Python, вроде результат отличатся не должен.


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