Экспертные системы- это интеллектуальные системы получать, накапливать и корректировать знания в заданной предметной области, получать новые знания, решать на основе этих знаний практические задачи и объяснять ход их решения.
Типичное применение экспертных систем- консультирование специалистов средней квалификации и неспециалистов в той сфере, для которой разработаны экспертные системы.
Создано немало экспертных систем в таких сферах, как медицинская диагностика, юриспруденция, управление технологическими процессами.
В создании экспертных систем должны принимать участие специалисты 2 категорий: экспертов и инженеров знаний.
Эксперты-это высококвалифицированные специалисты в данной предметной области, знания которых нужно передать экспертной системе.
Задачей инженеров знаний является формализция знаний экспертов и приведение их к виду, пригодному для занесения в базу знаний.
Наиболее известным языком программирования, предназначенным для разработки экспертных систем, считается язык Пролог. Этот язык имеет удобные средства для отображения фактов и правил, а в основе выполнения программы, написанной на ПРОЛОГе , лежит встроенный механизм логического вывода.
ответ: Delphi/Pascal
program Matrix24;
var
a:array [1..10,1..10] of integer;
Max,M, N, i, j:Integer;
begin
Write('N: ');
Readln(N);
Write('M: ');
Readln(M);
for i:=1 to M do
begin
writeln(i,': ');
for j:=1 to N do
begin
Write(j,' : ');
Read(a[i,j]);
end;
end;
for j:=1 to N do
begin
writeln(j,': ');
Max:=a[1,j];
for i:=2 to M do
begin
if a[i,j]>Max then Max:=a[i,j];
end;
writeln('Масимальный элемент:',Max);
end;
end
program Matrix24;
var
a:array [1..10,1..10] of integer;
Max,M, N, i, j:Integer;
begin
Write('N: ');
Readln(N);
Write('M: ');
Readln(M);
for i:=1 to M do
begin
writeln(i,': ');
for j:=1 to N do
begin
Write(j,' : ');
Read(a[i,j]);
end;
end;
for j:=1 to N do
begin
writeln(j,': ');
Max:=a[1,j];
for i:=2 to M do
begin
if a[i,j]>Max then Max:=a[i,j];
end;
writeln('Масимальный элемент:',Max);
end;
end.
//С++
#include <iostream>
using namespace std;
signed main() {
int n, pr = 1;
cin >> n;
for (int i = 1; i <= n; i++)
if (i % 7 == 0)
pr *= i;
cout << pr;
return 0;
}
#Python
pr = 1
n = int(input())
for i in range(1,n+1):
if i % 7 == 0:
pr *= i
print(pr)