Программа на repeat в паскале, в чем может быть дело? program zad6_repeat ; var f, f1, x, a, h: real; begin writeln('введите а '); readln(a); x: =-3; repeat f: =exp(-a*x)+exp(a*x)/f1; writeln('f(', x: 8: 2, ') =', f: 8: 2); if trunc(f1) mod 2 < > 0 then; writeln('не вычисляется при x=', x: 8: 2); x: =x+1; until x> 0; end. результат введите а 2 f( -3.00) =infinity не вычисляется при x= -3.00 f( -2.00) =infinity не вычисляется при x= -2.00 f( -1.00) =infinity не вычисляется при x= -1.00 f( 0.00) =infinity не вычисляется при x= 0.00

Пройдемся по коду: Возможно я не понял суть вашего ввода массива, но в циклах вы явно указывали не те размеры что надо.

Пропущены операторные скобки "main" раздела.

Неправильное использование else, так как он был отнесен совсем к другому оператору if.

-----------

Исправил все синт. ошибки, добавил вывод массива с сортировкой, исправил директивы.

#include <iostream>

int main()

{

int a[][2] = { 2,6,1,9,5,7,0,10};

for (int i = 0; i < 4; i++)

 if (i % 2 == 0) {

  for (int k = 0; k < 2 - 1; k++)

   for (int j = 0; j < 2 - 1; j++)

    if (a[i][j] > a[i][j + 1])

     std::swap(a[i][j], a[i][j + 1]);

 }

 else

  for (int k = 0; k<2 - 1; k++)

   for (int j = 0; j<2 - 1; j++)

    if ( a[i][j]<a[i][j + 1] )

     std::swap(a[i][j], a[i][j + 1]);

// Вывод результата

for (int i = 0; i < 4; i++) {

 for (int j = 0; j < 2; j++)

  std::cout << a[i][j] << " ";

 std::cout << std::endl;

}

return 0;

}

Кривое оформление сайта.. (в приложении код)

Ожог:
1. Убрать поражающий фактор.
2. Охладить место ожога.
3. Накрыть влажной повязкой.
4. Покой и противошоковые меры.
Обморок:
1. Если дыхательные пути свободны, пострадавший дышит и у него прощупывается пульс (слабый и редкий), его необходимо уложить на спину и приподнять ноги.
2. Расстегнуть сдавливающие части одежды.
3. Положить на лоб пострадавшего мокрое полотенце.
4. При рвоте пострадавшего необходимо перевести в безопасное положение или хотя бы повернуть голову набок, чтобы он не захлебнулся рвотными массами.
Остановка дыхания:
1. Непрямой массаж сердца.
2. Искусственная вентиляция легких.
3. Закрытие дыхательных путей инородным телом.