Программа на 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

1:
Вес текста = 59 * 16 бит = 944.0 бит = 118.0 байт = 0.115234375 Кбайт = 0.0001125335693359375 Mбайт
2:
Вес текста = 16 * 30 * 32 * 16 бит = 245760.0 бит = 30720.0 байт = 30.0 Кбайт = 0.029296875 Mбайт
3:
Вес символа = 25 * 8 * 1024 бит / (8 * 40 * 64 бит) = 10.0 бит
4:
Вес текста = 1024 * 64 * 64 * 8 бит = 33554432.0 бит = 4194304.0 байт = 4096.0 Кбайт = 4.0 Mбайт
5:
Вес текста = 52 * 16 бит = 832.0 бит = 104.0 байт = 0.1015625 Кбайт = 9.918212890625e-05 Mбайт
6:
Вес текста = 16 * 35 * 64 * 8 бит = 286720.0 бит = 35840.0 байт = 35.0 Кбайт = 0.0341796875 Mбайт

#include <iostream>
#include <iomanip>
int main()
{
    using namespace std;
    const int N = 4;
    const int M = 4;
    int Y[N][M];

    //как-нибудь заполняем матрицу
    for (int i = 0; i < N; ++i)
        for (int j = 0; j < M; ++j)
            Y[i][j] = (i + 1) * (j + 1);

    //выведем её на экран
    for (int i = 0; i < N; ++i)
    {
        for (int j = 0; j < M; ++j)
            cout << setw(3) << Y[i][j];
        cout << endl;
    }
        
    //находим сумму элементов побочной диагонали
    int S = 0;
    for (int i = 0; i < N; ++i)
        for (int j = 0; j < M; ++j)
            if (j == M - 1 - i)
                S = S + Y[i][j];
    cout << "Sum of adverse diagonal of array: " << S << endl;

    //находим сумму всех элементов матрицы
    int Sum = 0;
    for (int i = 0; i < N; ++i)
        for (int j = 0; j < M; ++j)
            Sum = Sum + Y[i][j];
    cout << "Sum of all elements of array: " << Sum << endl;
    return 0;
}