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

Вэтом году третий раз одна известная компания проводит соревнование по программированию искусственного интеллекта для игровых стратегий. в этот раз участникам предложили написать искусственный интеллект для командой хоккеистов. научившись оценивать время, за которое хоккеист сможет догнать шайбу, вася решил использовать это для улучшения своей стратегии. оказалось, что не всегда выгодно ехать к шайбе защитнику, так как соперника может перехватит ее раньше и выйти один на один с вратарем. чтобы избежать подобных провалов в обороне нужно еще определить, через сколько противник сможет подобрать шайбу. вася уже вычислил, что первому хоккеисту соперника понадобится для этого a условных единиц времени, а второму — b. ему подсчитать, через какое наименьшее время противник сможет подобрать шайбу. формат ввода во входном файле заданы два целых числа a и b (0 ≤ a, b ≤ 109) — за какое время хоккеисты соперника смогут подобрать шайбу.

👇
Ответ:

program z1;

var

a,b,c:int64;

input,output:text;

begin

 assign(input,'input.txt');

 reset(input);

 assign(output,'output.txt');

 rewrite(output);

 readln(input,a,b);

  begin

   if a<b then

   c:=a else

   c:=b

  end;

 writeln(output,c);

 close(input);

 close(output);

end.

4,7(68 оценок)
Открыть все ответы
Ответ:
Считалось, что архитектура компьютеров пятого поколения будет содержать два основных блока. Один из них - собственно компьютер, в котором связь с пользователем осуществляет блок, называемый "интеллектуальным интерфейсом". Задача интерфейса - понять текст, написанный на естественном языке или речь, и изложенное таким образом условие задачи перевести в работающую программу.Основные требования к компьютерам 5-го поколения: Создание развитого человеко-машинного интерфейса (распознавание речи, образов); Развитие логического программирования для создания баз знаний и систем искусственного интеллекта; Создание новых технологий в производстве вычислительной техники; Создание новых архитектур компьютеров и вычислительных комплексов.Новые технические возможности вычислительной техники должны были расширить круг решаемых задач и позволить перейти к задачам создания искусственного интеллекта. В качестве одной из необходимых для создания искусственного интеллекта составляющих являются базы знаний (базы данных) по различным направлениям науки и техники. Для создания и использования баз данных требуется высокое быстродействие вычислительной системы и большой объем памяти. Универсальные компьютеры производить высокоскоростные вычисления, но не пригодны для выполнения с высокой скоростью операций сравнения и сортировки больших объемов записей, хранящихся обычно на магнитных дисках. Для создания программ, обеспечивающих заполнение, обновление баз данных и работу с ними, были созданы специальные объектно ориентированные и логические языки программирования, обеспечивающие наибольшие возможности по сравнению с обычными процедурными языками. Структура этих языков требует перехода от традиционной фон-неймановской архитектуры компьютера к архитектурам, учитывающим требования задач создания искусственного интеллекта.К классу суперкомпьютеров относят компьютеры, которые имеют максимальную на время их выпуска производительность, или так называемые компьтеры 5-го поколения.
4,5(84 оценок)
Ответ:
martinovvanya2
martinovvanya2
27.11.2020
1)var ar:array[1..10] of integer;
ar2:array[1..10] of integer;
i,k,m:integer;
begin;
randomize;
writeln('First array');
for i:=1 to 10 do
begin;
ar[i]:=random(7,9);
write(ar[i]:4);
end;
m:=0;
writeln;
for i:=1 to 10 do
if ar[i]=8 then
begin;
inc(m);
ar2[m]:=8;
end;
for i:=1 to 10 do
if ar[i]=7 then
begin;
inc(m);
ar2[m]:=7;
end;
for i:=1 to 10 do
if ar[i]=9 then
begin;
inc(m);
ar2[m]:=9;
end;
writeln('Final array');
for i:=1 to 10 do
begin;
ar[i]:=ar2[i];
write(ar[i]:4);
end;
end.
2)var a,b,m,i,j,c:int64;
begin;
readln(m);
for i:=1 to m do
begin;
for j:=1 to m do
if sqr(i)+sqr(j)=m then
begin;
writeln(i,'^2+',j,'^2=',m);
c:=1;
end;
end;
if c<>1 then
writeln('Невозможно');
end.
4,8(73 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ