Пришлось перезадать во У меня проблемы с информатикой, программируем на паскале. задали два задания, впал в ступор. буду очень благодарен если будут объяснения решения. на языке паскаля, 8 кл Решить задачи с цикла FOR. №2. Найти минимальное из введенных трёхзначных чисел. Программа получает на вход сначала количество чисел, затем сами числа (не большие 1000 Программа выводит на экран одно число: наименьшее число из введённых. (подсказка: переменной min присвоить значение 1000)№3. Вывести на экран таблицу умножения на А. Пользователь вводит число А, программа выводит на экран произведение числа А на все числа от 1 до 10 в виде 5*1 = 5 5*2=10…

var

i, n, count2, max2, count3, min3 : Integer;

begin

ReadLn(n);

count2:=0; max2:=0;

count3:=0; min3:=1000;

for i:=1 to n do

begin

Read(n);

if (n>9) and (n<100) then

begin

inc(count2);

if n>max2 then max2:=n;

end;

if (n>99) and (n<1000) then

begin

inc(count3);

if n<min3 then min3:=n;

end;

end;

if count2=count3 then

WriteLn(0)

else if count2>count3 then

WriteLn(max2)

else

WriteLn(min3);

end.

Объяснение:

Экспертные системы- это интеллектуальные системы получать, накапливать и корректировать знания в заданной предметной области, получать новые знания, решать на основе этих знаний практические задачи и объяснять ход их решения.

Типичное применение экспертных систем- консультирование специалистов средней квалификации и неспециалистов в той сфере,  для которой разработаны экспертные системы.

Создано немало экспертных систем в таких сферах, как медицинская диагностика, юриспруденция, управление технологическими процессами.

В создании экспертных систем должны принимать участие специалисты 2 категорий: экспертов и инженеров знаний.

Эксперты-это высококвалифицированные специалисты в данной предметной области, знания которых нужно передать экспертной системе.

Задачей инженеров знаний является формализция знаний экспертов и приведение их к виду, пригодному для занесения в базу знаний.

Наиболее известным языком программирования, предназначенным для разработки экспертных систем, считается язык Пролог. Этот язык имеет удобные средства для отображения фактов и правил, а в основе выполнения программы, написанной на ПРОЛОГе , лежит встроенный механизм логического вывода.

program twonumbers;

var

 first, second: integer;

begin

 read(first, second);

 if ((first + second) mod 3 = 0) then

   write(first * second)

 else

 begin

   first := first * 2;

   second := second * 2;

   write(first, ' ', second);

 end;

end.

Объяснение:

program twonumbers;  // Название программы

var

 first, second: integer;  // Целочисленные переменные, хранящие вводимые с клавиатуры значения

begin  // Начало программы

 read(first, second);  // Считываем 2 целых числа с клавиатуры

 if ((first + second) mod 3 = 0) then  // Если сумма чисел кратна 3

   write(first * second)  // Выводим их произведение

 else  // Иначе

 begin  // Начало цикла

   first := first * 2;  // Увеличиваем первое вдвое

   second := second * 2;  // Увеличиваем второе вдвое

   write(first, ' ', second);  // Выводим их

 end;  // Конец цикла

end. // Конец программы