Var i,n,mn,mx: integer; a: array of integer; begin { считать количество чисел n } write('n = '); readln(n); { установить длину массива а n+1, массив динамический, нумерация с нуля} i:=1; setlength(a,n+1); writeln('введите числа через пробел: '); {циклический ввод n чисел с клавиатуры} repeat read(a[i]); i:=i+1; until i>n; { конец ввода } { начальные значения для максимума и минимума mn mx } mn:=a[1]; mx:=a[1]; { цикл по элементам массива } for i:=1 to n do begin { если элемент массива больше текущего максимума, то в максимум записать текущий элемент } if a[i]>mx then mx:=a[i]; { если элемент массива меньше текущего минимума, то в минимум записать текущий элемент } if a[i]<mn then mn:=a[i]; end; { конец цикла } writeln('min = ',mn,' max = ',mx); writeln('разница: (max - min) = ',mx-mn); end.
Ғаламтор - ғылым мен техниканың шынайы жетістігі. Ол - сөзсіз. Интернетті қолдана алатын кез келген адам өзіне қалаған ақпарат мен мағлұматты тауып, қажетіне жарата алады. Мазалап жүрген сауалдарының жауабын табады. Әлемдік жаңалықтар мен оқиғалардан хабардар болып отыруға көмектеспек. Бұл жағынан интернет адамның білімі мен қабілетін, тұлғалық қасиеттерін дамытуға ықпал етеді.
Ғаламтордың зиянды жақтары
Өкінішке орай, жоғарыда айтылған ғаламтордың артықшылықтарына қарамастан, оның зиян жақтары да көп болып шықты. Ғаламторға деген тәуелділік қазір ғаламдық мәселеге айналып бара жатыр. Соның кесірінен адамдар арасындағы күнделікті байланыс бұзылып барады. Адамдар бір-бірімен сөйлесуді, әңгімелесуді, сырын бөлісуді ұмытып бара жатқандай. Жылы шырай танытып, шүлдірлеп сөйлесуден, жанды, табиғи қатынастан қалып барамыз.
Ғаламтордың келесі зиянды тұсы - адамның денсаулығы. Компьютер алдында ұзақ отырған адамның денсаулығы да нашарлай түседі. Өйткені ол қозғалыстан қалып, оның соңы бел, арқа, көз ауруларына әкелуі мүмкін.
Одан бөлек, қазіргі таңда ғаламторда алаяқтар да көбейді. Олардан сақтанудың да қамын жасаған абзал.
a: array of integer;
begin
{ считать количество чисел n }
write('n = '); readln(n);
{ установить длину массива а n+1,
массив динамический, нумерация с нуля}
i:=1; setlength(a,n+1);
writeln('введите числа через пробел: ');
{циклический ввод n чисел с клавиатуры}
repeat
read(a[i]);
i:=i+1;
until i>n;
{ конец ввода }
{ начальные значения для максимума и минимума mn mx }
mn:=a[1]; mx:=a[1];
{ цикл по элементам массива }
for i:=1 to n do
begin
{ если элемент массива больше текущего максимума,
то в максимум записать текущий элемент }
if a[i]>mx then mx:=a[i];
{ если элемент массива меньше текущего минимума,
то в минимум записать текущий элемент }
if a[i]<mn then mn:=a[i];
end;
{ конец цикла }
writeln('min = ',mn,' max = ',mx);
writeln('разница: (max - min) = ',mx-mn);
end.
Ғаламтордың пайдасы
Ғаламтор - ғылым мен техниканың шынайы жетістігі. Ол - сөзсіз. Интернетті қолдана алатын кез келген адам өзіне қалаған ақпарат мен мағлұматты тауып, қажетіне жарата алады. Мазалап жүрген сауалдарының жауабын табады. Әлемдік жаңалықтар мен оқиғалардан хабардар болып отыруға көмектеспек. Бұл жағынан интернет адамның білімі мен қабілетін, тұлғалық қасиеттерін дамытуға ықпал етеді.
Ғаламтордың зиянды жақтары
Өкінішке орай, жоғарыда айтылған ғаламтордың артықшылықтарына қарамастан, оның зиян жақтары да көп болып шықты. Ғаламторға деген тәуелділік қазір ғаламдық мәселеге айналып бара жатыр. Соның кесірінен адамдар арасындағы күнделікті байланыс бұзылып барады. Адамдар бір-бірімен сөйлесуді, әңгімелесуді, сырын бөлісуді ұмытып бара жатқандай. Жылы шырай танытып, шүлдірлеп сөйлесуден, жанды, табиғи қатынастан қалып барамыз.
Ғаламтордың келесі зиянды тұсы - адамның денсаулығы. Компьютер алдында ұзақ отырған адамның денсаулығы да нашарлай түседі. Өйткені ол қозғалыстан қалып, оның соңы бел, арқа, көз ауруларына әкелуі мүмкін.
Одан бөлек, қазіргі таңда ғаламторда алаяқтар да көбейді. Олардан сақтанудың да қамын жасаған абзал.