Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
нет,оно вряд ли.ведь что такое компьютер? это арифрометр.не видили никогда такую машинку? компьютер работает тупо.а про разборки (искусственого интелекта) я могу много баек рассказать могу это дело.и в ученые доили.государство,и в сша.
vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.
var i: integer; s: real;
begin s : = 0; for i : = 1 to 100 do s : = s + i * i; writeln(s: 7: 0); end.
var a: array[1..10] of integer;
i,s: integer;
begin
randomize;
for i: = 1 to 10 do begin
a[i]: = random(100);
s: =s+a[i];
end;
writeln(s);
end.
i,mk,pk,s,p: integer;
p: =1;
a[i]: = random(30+10)-10;
if a[i]> =0 then begin
pk: =pk+1;
end
else begin
mk: =mk+1;
p: =p*a[i];
writeln(pk,s,mk,p);
Популярные вопросы