дано двовимірний масив розміром k знати випадковим числом в діапазоні від 0 до 25 вивести отриманий масив на екран та зробити зміни
1) елементи головного діагоналі на цифру 8
2)елемент які рівні 0 замінити на 1
3)знайти суму елементів з непарними індексом
begin
var (a, b) := ReadInteger2; // Считывание a и b
var simple := ArrFill(b + 1, true); // Инициализация булевого массива значением true.
// Реализация решета Ератосфена
for var i := 2 to b do
if simple[i] then
begin
var j := i * i;
while (j <= b) do
begin
simple[j] := false;
j += i;
end;
end;
// Вывод на экран найденного результата
for var i := a to b do
if (simple[i]) and (i > 1) then i.Print
end.
1 Кнопки назад/вперёд для загрузки предыдущей/следующей страницы
2 Адресная строка, совмещенная с полем поиска
3 Кнопка Поиск - открывает окно поискового запроса
4 Кнопка Обновить - для обновления содержимого окна
5 Кнопка Остановить - останавливает загрузку веб - страницы
6 Панель для вкладок (просматриваемых веб - страниц)
7 Кнопка Домой - переход на стартовую страницу
8 Кнопка Настройки
Также есть само окно браузера, в котором работает пользователь, кнопки в верхнем правом углу Свернуть/Закрыть, вкладки веб-страниц (в шапке каждой - название и значок закрытия), значок для создания новых веб-страниц.