Отметьте свойства естественного языка * 1)Одни и те же объекты могут иметь несколько названий
2)Некоторые слова могут иметь несколько значений
3)Однозначные, строгие правила образования выражений
4)Обладает большими выразительными возможностями
5)Значение отдельных слов может зависеть от их окружения (контекста)
6)Создан людьми для специальных целей либо для определенных групп людей
Res, Simple: array[1..100] of integer;
Found:boolean;
Begin
for i := 2 to 200 do begin
found := false;
for j := 1 to simple_n do
found := found or (i mod Simple[j] = 0);
if found and (i mod 2 = 1) then begin
res_n := res_n + 1;
Res[res_n] := i;
writeln('Res = ',Res[res_n]:4);
end;
if not found then begin
simple_n := simple_n + 1;
Simple[simple_n] := i;
writeln('Simple = ',Simple[simple_n]:4);
end;
end;
for i := 1 to res_n do
write(Res[i]:4);
End.