1) 1,2,1
Так как: ((5*3)-3)*5=60
2) Сместиться на (0;0) - Но не уверен т.к. условие немного некорректное
Присваеваеш максимум к каждому числу при определенных условиях
это !!!своеобразный метод!!!
передача информации<em />-физический процесс, посредством которого осуществляется перемещение информации в пространстве. Записали информацию на диск и перенесли в другую комнату .Данный процесс характеризуется наличием следующих компонентов :
1.Источник информации.
2.Приемник информации.
3.Носитель информации
4.Среда передачи.
передача информации-за благовременное организованное техническое мероприятие, результатом которого воспроизведение информации ,имеющейся в одном месте, условно называемом "источником информации", в другом месте, условно называемом "приёмником информации". Данное мероприятие предполагает предсказуемый срок получения указанного результата.
<em>Передача информации</em>
<em> </em><em> информациональный канал </em>
<em>источник инф-и. => приемник инф-и.</em>
<em> (биологический и предметный )- способ.</em>
<em>Органы чувств: телефон, интернет, бумага.</em>
<em> Передача информации</em>
<em>односторонняя...... и .. двусторонняя</em>
<em>-> <-></em>
<em />
(если сумма цифр числа делится на 3, то число делится на 3 нацело)
var a, s: integer;
begin
s:=0;
writeln ('Введите число');
while a<> 0 do
begin
a:= a mod 10
S:=s+a;
end;
if S mod 3 = 0 then writeln ('делится') else
writeln ('не делится');
end.
uses crt;
var i,min,s:integer;
a:array[1..60] of integer;
begin
s:=0;
for i:=1 to 60 do a[i]:=random(35)+1;
min:=a[1];
for i:=1 to 60 do if min > a[i] then min:=a[i];
for i:=1 to 60 do if a[i] = min then inc(s);
writeln(s,' books for price = ',min,' ru.');
end.