Гипер текст это.. 1 большой текст 2 структурный текст 3 текст, в котором используется большой размер

Гипер текст - структурный текст

Впервой находятся все 4-значные числа, а не только симметричные. паскаль авс. program  ilgiz98; var   i: integer; begin   writeln('*** alphaeus is ***');   writeln('***                  ok                        ***');   writeln('программа находит 4-значные числа, которые делятся на 27');   writeln('список таких чисел: ');   for i: =1000 to 9999 do       if (i mod 27)=0 then writeln(i); end. program  ilgiz98; var   mass: array [1..20] of integer;   i, k, n: integer; begin   writeln('*** alphaeus is ***');   writeln('***                  ok                        ***');   writeln('среди элементов массива программа находит числа, которые больше заданного числа n и одновременно кратны 5');   write('введите число n ');   readln (n);   writeln('*** ***');   k: =0;   writeln('массив чисел: ');   for i: =1 to 20 do       begin         mass[i]: =random(1000)-500;         writeln(mass[i]);         if (mass[i]> n) and ((mass[i] mod 5)=0) then k: =k+1;   end;   writeln();   writeln('всего найдено ',k,' таких чисел'); end.

Program  ilgiz98; var   i: integer; begin   writeln('*** alphaeus is ***');   writeln('***                  ok                        ***');   writeln('программа находит 4-значные числа, которые делятся на 27');   writeln('список таких чисел: ');   for i: =1000 to 9999 do       if (i mod 27)=0 then writeln(i); end. program  ilgiz98; var   mass: array [1..20] of integer;   i, k, n: integer; begin   writeln('*** alphaeus is ***');   writeln('***                  ok                        ***');   writeln('среди элементов массива программа находит числа, которые больше заданного числа n и одновременно кратны 5');   write('введите число n ');   readln (n);   writeln('*** ***');   k: =0;   writeln('массив чисел: ');   for i: =1 to 20 do       begin         mass[i]: =random(1000)-500;         writeln(mass[i]);         if (mass[i]> n) and ((mass[i] mod 5)=0) then k: =k+1;   end;   writeln();   writeln('всего найдено ',k,' таких чисел'); end.