1. Опишите цикл со счетчиком, приведите пример. 2. Опишите цикл с предусловием, приведите пример. 3. Опишите цикл с постусловием, приведите пример. 4. int main() - что означает эта запись? почему надо писать int, а не float или double? 5. return (0) и return(3) - в чем отличие этих выражений? 6. Что означает директива #include 7. Что такое массив? 8. Что означает запись for(i=9;i<20;i++ Опишите эту запись 9. Что означает запись в коде программы double x[10] ? 10. Что означает запись в коде программы cout << endl; ? 11. Чем отличается массив от матрицы ?

Коли говорять про комунікативну сторону спілкування, то мають вазі той факт, що в спільній діяльності люди обмінюються уявними, інтересами ідеями, настроями, почуттями, установками, інформацією. Людська комунікація має свою специфіку, тому о в умовах людського спілкування інформація не лише передається, але й формується, уточнюється, розвивається. Обмін інформацією між двома особистостями має суб'єкт-суб'єктний характер: посилаючи інформацію, ми орієнтуємось на іншого суб'єкта, враховуємо його цілі, мотиви, установки, одержуємо нову інформацію, тобто прагнемо виразити загальний смисл, а це можливо лише за умови, до інформація не прийнята, а й зрозуміла, осмислена. Тому в кожному комунікативному процесі реально представлені діяльність спілкування і пізнання. Взаєморозуміння можливе лише за умови наявності єдиної системи значень для всіх членів групи (так званого тезаурусу"). При цьому мають на увазі не лише розуміння значення слів, а й розуміння значення ситуації. Відомо, що пряме висловлення і його розуміння не завжди збігаються. Окрім того, в умовах людської комунікації можуть виникати абсолютно специфічні комунікативні бар'єри, пов'язані з соціальними, політичними, релігійними, професійними бар'єрами, або з індивідуальними психологічними особливостями тих, хто спілкується (сором'язливість, некомунікабельність, ворожість, недовіра та ін.).Объяснение:

var

 n, max, count, contrl, max2: integer;

begin

 contrl := 0;

 max := 0;

 Writeln('Введите числа: ');

 Readln(n);

 while n <> 0 do

 begin

   Inc(count);

   if n>max then begin max2:=max; max:=n end

   else if n > max2 then max2 := n;

   Read(n);

 end;

 max2*=max;

 Writeln('Введите контрольное значение: ');

 Read(contrl);

 Writeln('Получено: ', count, ' чисел');

 Writeln('Получено контрольное значение: ', contrl);

 Writeln('Вычисленное контрольное значение:: ', max2);

 if contrl = max then Writeln('Контроль пройден')

 else Writeln('Контроль не пройден');

end.