Почему множество действительных (вещественных) чисел , представляемых в памяти компьютера , дискретно , конечно и ограничено?

Наверное, потому что конечна память компьютера и компьютер работает только с дискретными данными

Var k,a,b,c: integer; begin writeln('введите первое число'); readln(a); writeln('введите второе число'); readln(b); writeln('введите третье число'); readln(c); writeln('введите число k'); readln(k); if a mod k = 0 then writeln('первое число кратно k') else writeln('первое число не кратно k'); if b mod k = 0 then writeln('второе число кратно k') else writeln('второе число не кратно k'); if c mod k = 0 then writeln('третье число кратно k') else writeln('третье число кратно k'); end.это первая !

Впрограммировании операцию "" конкретных значений объектам программы называют присваиванием. в языке паскаль присваивание начальных значений элементам массива можно производить либо непосредственно, либо в цикле.     непосредственное присваивание используется, если количество таких присваиваний невелико. в этом случае записываются операторы присваивания для каждого элемента массива, которому нужно присвоить значение, например: a[6]: =5; b[4,12]: =11; и т.д.     присваивание в цикле используется, когда количество элеметнов массива велико, а значение для конкретного элемента можно или задать общим алгоритмом, или ввести извне (с клавиатуры или из файла). в этом случае цикл организуется так, чтобы параметры цикла перебрали все необходимые индексы элементов массива. примеры: for i: =1 to 20 do a[i]: =3*i^2-1; for i: =1 to m do     for j: =1 to n do       readln(a[i,j]); еще пример - заполнение случайными числами в диапазоне (-20..20) randomize; for i: =1 to m do x[i]: =random(40)-20;