Составить программу для решения задачи: сколько моль и сколько молекул любого вещества содержится в одном грамме этого вещества.

Программа:

{Free Pascal Compiler version 3.0.4+dfsg-23 [2019/11/25] for x86_64}

{Copyright (c) 1993-2017 by Florian Klaempfl and others}

{Target OS: Linux for x86-64}

program test;

const

 start = -100;

 finish = 50;

 count = 100;

var

 X : array of integer; {массив}

 i : integer; {Счётчик цикла}

 S : integer; {Сумма положительных}

begin

Randomize;

SetLength(X, count+1);

{Генерация массива из 100 элементов от -50 до 50}

for i := 1 to count do

 X[i] := Round( Random * start) + finish;

{Вывод сгенерированного массива на экран}

for i := 1 to count do

 write(X[i]:4);

writeln; writeln;

{Подсчёт положительных элементов}

S := 0;

for i := 1 to count do

 if (x[i] > 0) then

  S := S + x[i];

writeln('Сумма положительных S = ', S);

end.

Ғаламтордың пайдасы

Ғаламтор - ғылым мен техниканың шынайы жетістігі. Ол - сөзсіз. Интернетті қолдана алатын кез келген адам өзіне қалаған ақпарат мен мағлұматты тауып, қажетіне жарата алады. Мазалап жүрген сауалдарының жауабын табады. Әлемдік жаңалықтар мен оқиғалардан хабардар болып отыруға көмектеспек. Бұл жағынан интернет адамның білімі мен қабілетін, тұлғалық қасиеттерін дамытуға ықпал етеді.

Ғаламтордың зиянды жақтары

Өкінішке орай, жоғарыда айтылған ғаламтордың артықшылықтарына қарамастан, оның зиян жақтары да көп болып шықты. Ғаламторға деген тәуелділік қазір ғаламдық мәселеге айналып бара жатыр. Соның кесірінен адамдар арасындағы күнделікті байланыс бұзылып барады. Адамдар бір-бірімен сөйлесуді, әңгімелесуді, сырын бөлісуді ұмытып бара жатқандай. Жылы шырай танытып, шүлдірлеп сөйлесуден, жанды, табиғи қатынастан қалып барамыз.

Ғаламтордың келесі зиянды тұсы - адамның денсаулығы. Компьютер алдында ұзақ отырған адамның денсаулығы да нашарлай түседі. Өйткені ол қозғалыстан қалып, оның соңы бел, арқа, көз ауруларына әкелуі мүмкін.

Одан бөлек, қазіргі таңда ғаламторда алаяқтар да көбейді. Олардан сақтанудың да қамын жасаған абзал.