10) Web-страница имеет формат (расширение):
a) .txt
b) .htm
c) .doc
d) .rtf
e) *.exe
11) Компьютер, подключенный к Internet, обязательно имеет :
a) IP адрес
b) Web сервер
c) Домашнюю Web страницу
d) Доменное имя
e) Гипертекстовый редактор
12) HTML (Hyper Text Markup Languge) является….
a) Средством страниц
b) Транслятором языка программирования
c) Сервером Интернет
d) Средством создания Web - страниц
13) Адресация это - …..
a) Количество символов/сек пересылаемой информации модемом идентификации абонентов в сети
c) Адрес сервера
d) Почтовый адрес пользователя сети
14) Что обозначают буквы перед адресом странички (HTTP) ?
a) Имя пользователя в сети.
b) Адрес сервера в сети Internet
c) Протокол, по которому браузер связывается с WEB-сервером так
15) Назначение WEB – серверов:
a) Подключение пользователей к сети Internet
b) Хранение файловых архивов
c) Общение по сети Internet
d) Хранение гипертекстовых документов
16) Серверы Интернета, содержащие файловые архивы, позволяют...
a) скачивать необходимые файлы
b) получать электронную почту
c) участвовать в телеконференциях
d) проводить видеоконференции
17) В глобальной компьютерной сети Интернет протокол маршрутизации Internet Protocol (IP) обеспечивает ...
a) передачу информации по заданному адресу;
b) разбиение передаваемого файла на части (пакеты)
c) получение почтовых сообщений;
d) передачу почтовых сообщений.

18) Какой протокол использует электронная почта?
a) HTTP;
b) FTP;
c) PO;
d) SMTP.
19) Услуга по размещению сайта на сервере, постоянно находящемся в сети Интернет-
a) хостинг
b) модератор
c) инструкция
d) меню
20) При наполнении страниц сайта информационными материалами следует придерживаться следующих рекомендаций:
a) Названия пунктов меню делайте длинными; допустимо растягивание названия пункта на несколько строк.
b) Не выбирайте для страниц пёстрый фон, на таком фоне текст читается с трудом.
c) Не пишите слишком коротких текстов. Текст разбивайте на большие абзацы, отделяя их друг от друга пустыми строками.
d) Выбирайте для страниц пёстрый фон, на таком фоне текст читается очень легко.
e) В каждом абзаце используйте одни и те же приёмы форматирования.
f)

👇

Увидеть ответ

Ответ:

димас203

29.10.2021

10) b) *.htm

11) a) IP адрес

12) d) Средством создания Web - страниц

идентификации абонентов в сети

14) c) Протокол, по которому браузер связывается с WEB-сервером

15) d) Хранение гипертекстовых документов

16) a) скачивать необходимые файлы

17) a) передачу информации по заданному адресу;

18) d) SMTP.

19) a) хостинг

20)

b) Не выбирайте для страниц пёстрый фон, на таком фоне текст читается с трудом.

e) В каждом абзаце используйте одни и те же приёмы форматирования.

4,7(42 оценок)

Открыть все ответы

Ответ:

gg322

29.10.2021

Основа взята на сайте progmatem.ru. К сожалению, автор статьи там не был указан.

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
uses graphABC;
const
w=1000;
h=600;

function f(x:real):=0.5*x*cos(2*x);

begin
SetWindowSize(w,h);
// поле для графика в окне
var xLeft:=50;
var yLeft:=50;
var xRight:=w-xLeft;
var yRight:=h-yLeft;
// интервалы по осям
var ax:=-12.0;
var bx:=12.0;
var hx:=1.0;
var ay:=-6.5; // минимум f(x) с запасом
var by:=6.5;
var hy:=0.5;
// масштабы по осям
var mx:=(xRight-xLeft)/(bx-ax);
var my:=(yRight-yLeft)/(by-ay);
// точка начала координат графика
var x0:=xLeft+Trunc(abs(ax)*mx);
var y0:=yRight-Trunc(abs(ay)*my);
// рисование координатных осей
Line(xLeft,y0,xRight+10,y0);
Line(x0,yLeft-10,x0,yRight);
SetFontSize(12); SetFontColor(clBlue);
TextOut(xRight+15,y0-10,'X');
TextOut(x0-4,yLeft-30,'Y');
SetFontSize(8); SetFontColor(clGreen);
// рисование засечек
var s:string;
for var i:=1 to Round((bx-ax)/hx)+1 do begin
    var num:=ax+(i-1)*hx;
    var x:=xLeft+Trunc(mx*(num-ax));
    Line(x,y0-3,x,y0+3);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x-TextWidth(s) div 2,y0+10,s)
    end;
for var i:=1 to Round((by-ay)/hy)+1 do begin
    var num:=ay+(i-1)*hy;
    var y:=yRight-Trunc(my*(num-ay));
    Line(x0-3,y,x0+3,y);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x0+7,y-TextHeight(s) div 2,s)
    end;
    TextOut(x0-10,y0+10,'0');
// собственно график
var xi:=ax;
while xi<=bx do begin
    var yi:=f(xi);
    var x:=x0+Round(xi*mx);
    var y:=y0-Round(yi*my);
    if (y>=yLeft) and (y<=yRight) then SetPixel(x,y,clRed);
    xi+=1e-3
    end
end.

*******************************************
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
uses graphABC;
const
w=1000;
h=600;

function f(x:real):=8*sin(x)*sin(2*x);

begin
SetWindowSize(w,h);
// поле для графика в окне
var xLeft:=50;
var yLeft:=50;
var xRight:=w-xLeft;
var yRight:=h-yLeft;
// интервалы по осям
var ax:=-15.0;
var bx:=15.0;
var hx:=1.0;
var ay:=-6.5; // минимум f(x) с запасом
var by:=6.5;
var hy:=0.5;
// масштабы по осям
var mx:=(xRight-xLeft)/(bx-ax);
var my:=(yRight-yLeft)/(by-ay);
// точка начала координат графика
var x0:=xLeft+Trunc(abs(ax)*mx);
var y0:=yRight-Trunc(abs(ay)*my);
// рисование координатных осей
Line(xLeft,y0,xRight+10,y0);
Line(x0,yLeft-10,x0,yRight);
SetFontSize(12); SetFontColor(clBlue);
TextOut(xRight+15,y0-10,'X');
TextOut(x0-4,yLeft-30,'Y');
SetFontSize(8); SetFontColor(clGreen);
// рисование засечек
var s:string;
for var i:=1 to Round((bx-ax)/hx)+1 do begin
    var num:=ax+(i-1)*hx;
    var x:=xLeft+Trunc(mx*(num-ax));
    Line(x,y0-3,x,y0+3);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x-TextWidth(s) div 2,y0+10,s)
    end;
for var i:=1 to Round((by-ay)/hy)+1 do begin
    var num:=ay+(i-1)*hy;
    var y:=yRight-Trunc(my*(num-ay));
    Line(x0-3,y,x0+3,y);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x0+7,y-TextHeight(s) div 2,s)
    end;
    TextOut(x0-10,y0+10,'0');
// собственно график
var xi:=ax;
while xi<=bx do begin
    var yi:=f(xi);
    var x:=x0+Round(xi*mx);
    var y:=y0-Round(yi*my);
    if (y>=yLeft) and (y<=yRight) then SetPixel(x,y,clRed);
    xi+=1e-3
    end
end.

Составьте программу, которая строит график зависимости: а) y(x)=0.5x *cos 2x на промежутке [-12; 12]

Составьте программу, которая строит график зависимости: а) y(x)=0.5x *cos 2x на промежутке [-12; 12]

4,7(1 оценок)

Ответ:

almiradkzbd

29.10.2021

Решение №1 (без массивов)

var a,n,i,j,s:integer;
begin
writeln('Введите количество цифр в числе');
readln(n);
for i:=1 to n do begin
    writeln('Введите ',i,' цифру из ',n);
    readln(a);
    for j:=1 to n-i do a:=a*10;
    s:=s+a;
end;
writeln('Натуральное число: ',s);
end.

Тестовое решение

Введите количество цифр в числе
5
Введите 1 цифру из 5
9
Введите 2 цифру из 5
2
Введите 3 цифру из 5
7
Введите 4 цифру из 5
3
Введите 5 цифру из 5
1
Натуральное число: 92731

Решение №2 Если очень надо использовать массив (хотя на мой взгляд совсем не нужно)

//PascalABC.NET (версия 3.1, сборка 1198)
var a,n,i,j,s:integer;
mas:array[1..10]of integer;
begin
writeln('Введите количество цифр в числе');
readln(n);
for i:=1 to n do begin
    writeln('Введите ',i,' цифру из ',n);
    readln(mas[i]);
    a:=mas[i];
    for j:=1 to n-i do a:=a*10;
    s:=s+a;
end;
writeln('Натуральное число: ',s);
end.

Тестовое решение

Введите количество цифр в числе
5
Введите 1 цифру из 5
5
Введите 2 цифру из 5
4
Введите 3 цифру из 5
3
Введите 4 цифру из 5
2
Введите 5 цифру из 5
2
Натуральное число: 54322

4,7(95 оценок)

Это интересно:

Стиль-и-уход-за-собой

07.05.2020

Правильный выбор парика: все, что вам нужно знать...

Образование-и-коммуникации

01.09.2020

Как нарисовать банан: подробная инструкция для начинающих...

Семейная-жизнь

09.02.2020

Все, что вам нужно знать о последних неделях беременности...

Здоровье