Развития информационных языков программирования реферат

языки программированияязык программирования - это система обозначений, служащая для точного описания программ или алгоритмов для эвм. языки программирования являются искусственными языками. от естественных языков они отличаются ограниченным числом “слов” и строгими правилами записи команд (операторов). поэтому при применении их по назначению они не допускают свободного толкования выражений, характерного для естественного языка.можно сформулировать ряд требований к языкам программирования и классифицировать языки по их особенностям.основные требования, предъявляемые к языкам программирования: наглядность - использование в языке по возможности уже существующих символов, хорошо известных и понятных как программистам, так и пользователям эвм; единство - использование одних и тех же символов для обозначения одних и тех же или родственных понятий в разных частях алгоритма. количество этих символов должно быть по возможности минимальным; гибкость - возможность относительно удобного, несложного описания распространенных приемов вычислений с имеющегося в языке ограниченного набора изобразительных средств; модульность - возможность описания сложных алгоритмов в виде совокупности простых модулей, которые могут быть составлены отдельно и использованы в различных сложных алгоритмах; однозначность - недвусмысленность записи любого алгоритма. отсутствие ее могло бы к неправильным ответам при решении [].в настоящее время в мире существует несколько сотен реально используемых языков программирования. для каждого есть своя область применения.

Var   x, x1: integer;   breakloop, nondescending: boolean; begin   writeln('вводите числовую последовательность');   read(x);   read(x1);   nondescending : = (x1 > = x);   repeat       read(x);       if x < > 0 then           if nondescending then breakloop : = (x < x1)           else breakloop : = (x > x1);       x1 : = x   until breakloop or (x = 0);   if breakloop then writeln(#13#10, 'последовательность ')   else   if nondescending then writeln(#13#10, 'последовательность неубывающая')   else writeln(#13#10, 'последовательность невозрастающая') end. тестовое решение вводите числовую последовательность 7 12 12 18 34 0 последовательность неубывающая

Var   a, c: boolean;   b, b1: integer; begin   readln(b);   readln(b1);   if (b > b1) then     a : = true   else     if (b1 > b) then       a : = false;   while (true) do   begin     readln(b1);     if (0 in [b, b1]) then       break;     if a then     begin       if (b < b1) then         c : = true;     end     else       if (b > b1) then         c : = true;     b : = b1;   end;   if c then     writeln('случайная')   else     if (a) then       writeln('невозрастающая')     else       writeln('неубывающая'); end. само собой, должно быть минимум 2 числа в последовательности: )