Лабораторная работа № 1. Знакомство с HTML Ознакомиться с работой следующих тегов и параметров: html, head,
title, body (bgcolor, background, text, link), p (align), b, em, u, i, font, ol/ul, li, a.
Обратить внимание на то, что теги бывают парные и непарные, а также
на то, что у многих тегов имеются параметры.
Задание 1.1. Создать в Блокноте следующую web-страничку (Название
в title указать «Знакомство с HTML»):
Название страницы
Эпиграф
Кратко о себе несколько строчек. Описание должно содержать использование нескольких шрифтов, несколько слов выделить цветом. Страничка
должна содержать все перечисленные теги с разными параметрами.
Число
Что-то вроде подписи в виде графического файла
Работа с таблицами, рисунками, гиперссылками
Для работы с таблицами используются теги table (border), tr (width,
height), td/th (align, valign, width, colspan, rowspan)
Задание 1.2. Добавить к своей странице 2 таблицы с осмысленной информацией. Одна таблица — обычная, вторая должна содержать объединенные ячейки.
Для вставки рисунка используется тег img (alt, align, width, height,
vspace, hspace, border).
Задание 1.3. Добавить к своей странице один рисунок три раза с разными размерами. Все используемые рисунки должны храниться в отдельной
папке.
Гипертекстовые связи задаются при тега a (href, target, name).
Связи бывают трех видов: ссылки на ресурсы Internet, ссылка на сервис электронной почты, ссылки внутри документа.
Задание 1.4. Реализовать все три типа гиперссылок.
Дано:
Математическое выражение:
«(89+75)−2(72:(3+7))»
Найти:
Значение выражения и округлить его в MS Ecxel.
Формула (Её нужно ввести в окошко Excel и нажать "Enter"):
«=ОКРУГЛ((89+75)-2*(72/(3+7));2)»
ответ:
149,6
(До сотых программа округлить не может, ибо число имеет только десятые в ответе)
Далее скриншот, и файл Excel в котором формула и сам ответ.
N = 10;
var
A: array[1..N] of integer;
function Fun: integer;
var
i, M: integer;
begin
writeln('Введите число M=');
readln(M);
for i := 1 to N do
if A[i] = M then Fun := i;
end;
procedure CreateMassive;
var
i: integer;
begin
for i := 1 to N do
begin
A[i] := Random(199) - 100;
write(A[i],' ');
end;
Writeln;
end;
begin
CreateMassive;
Writeln(Fun);
end.
вот вариант исправления который работает, хотя конечно не факт что он работает как там кто-то задумывал)))
не понятно было назначение функции Fun потому она делает поиск номера элемента равного М
а вообще глобальные переменные это зло. Так что проектирование тут в корне не верно