выравнивание информации за счет расположения ее в ячейках таблицы. с таблиц текст можно представлять в виде колонок выравнивание названий и полей формы расположение на web-странице текста и графических изображений по разным колонкам использование вложенных таблиц различного фона для отдельных частей страницы
2)чтобы создать таблицу, используют команду таблица > вставить таблицу. в открывшемся диалоговом окне указывают размер таблицы (в ячейках), а также дополнительные параметры, реализуемые как атрибуты соответствующих тегов. чтобы занести информацию в таблицу, следует установить курсор в нужную ячейку и начать ввод. при работе с ячейками таблицы можно применять любые команды форматирования.
Ответ дал: Гость
var
a: [1..100] array of integer;
i,n,p: integer;
begin
readln(n);
for i: =1 to n do
begin
readln(a[i]);
p: =2;
while (p*p< =a[i]) do
begin
if p*p=a[i] then writeln (a[i],' полный квадрат')
p: =p+1;
end;
end;
end.
Ответ дал: Гость
var i: integer;
begin
for i: =1 to 1000 do
if i mod 2 = 1 then writeln(i*i*i);
end.
Ответ дал: Гость
держи:
program kk; uses crt; var a: array [1..5,1..5] of integer; i,j: integer; beginclrscr; randomize; for i: =1 to 5 dobeginfor j: =1 to 5 doa[i,j]: = random(90)+10; end; for i: =1 to 5 dobeginfor j: =1 to 5 do write(a[i,j],' '); writelnend; writeln; writeln; for i: =1 to 5 dobeginfor j: =1 to 5 dobegin if (a[i,j] > 0) and (a[i,j] mod 3 = 0) thenbeginwriteln(a[i,j],' [',i, ',',j,']'); end; end; end; readkey; end.
Популярные вопросы