Aurora 3D Text and Logo Maker - это продвинутый, мощный дизайнерский инструмент для создания уникального 3D текста, кнопок и логотипов, имеет достаточно большое количество шаблонов и готовых форм, которые можно использовать для создания собственного текста. Aurora 3D Text and Logo Maker имеет комплект эффектов, анимаций, текстур, с которых можно украсить 3D логотип или текст. При создании трёхмерного логотипа можно отрегулировать уровень света, добавить теней, рельеф, выбирать различные варианты искривления, выравнивания, освещения, наложения объектов и т. д. Допускается импорт шрифтов и SVG-графики. Итоговый вариант выводится в виде PNG, TGA, TIFF, JPG, BMP, XPM и PPM-файлов.
Const n=10;m=7; var a:array[1..n,1..m]of integer; flag,i,j,b:integer; begin for i:=1 to n do begin writeln; for j:=1 to m do begin a[i,j]:=random(312)-111; write(a[i,j]:4); end; end; writeln; Writeln('B ?'); readln(b); for i:=1 to n do for j:=1 to m do if a[i,j]=b then flag:=1; if flag=1 then writeln('Yes') else writeln('N'); end.
вариант 2 const n=10;m=7; var a:array[1..n,1..m]of integer; k,i,j,b:integer; begin for i:=1 to n do begin writeln; for j:=1 to m do begin a[i,j]:=random(312)-111; write(a[i,j]:4); end; end; writeln; Writeln('B ?'); readln(b); for i:=1 to n do for j:=1 to m do if a[i,j]=b then k:=k+1; if k<>0 then writeln('Yes') else writeln('N'); end.
