borisowaew
?>

Составьте алгоритм нахождения периметра прямоугольника в словесной форме

Информатика

Ответы

marketing601

Program n1;
Uses CRT;
Const n=15;
Var A: array[1..n] of integer; B: array[1..n] of integer;
i,k,max: integer;
begin
randomize;
clrscr;
Writeln('ishodny massiv');
For i:=1 to n do
begin
a[i]:=random(100);
a[i]:=a[i]-50;
write(a[i]:4);
end;
writeln;
writeln('polychenny massiv');
max:=0;
For i:=1 to n do
begin
b[i]:=-a[i];
write(b[i]:4);
If a[i]=b[i] then k:=k+1;
If (b[i]>0)and(b[i]>max) then max:=b[i];
If (b[i]<0)and(-b[i]>max) then max:=-b[i];
end;
writeln;
Writeln('Kolychestvo neizmenyvshihsa elementov=',k,', samyi bolshoy po modyly element raven =',max);
writeln
end.

akarabut343
◘Объективность информации. Например: "На улице холодно" - это субъективная информация. А "На улице -14°" - объективная (но не всегда точная)
◘Достоверность информации. Ин-фа достоверна, если отражает истинное положение дел. (объективная информация всегда достоверна)
◘Полнота информации. Информация полная, если ее достаточно для понимания и принятия решения.
◘Точность информации. Определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т.д.
◘Актуальность информации – важность для настоящего времени.
◘Полезность информации.
 - Самая ценная информация – объективная, достоверная, полная, и актуальная.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составьте алгоритм нахождения периметра прямоугольника в словесной форме
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Максим
moskvichkabakery56
samogon-mozhaisk
sbraginets
Екатерина1979
natalyaionova
zorinka777
Державина
plv-57
kulagin777
matterfixed343
losevev5619
Mikhailova
Dmitrievna Lvovich
leonid-adv70