4 года назад

Что такое протокол сети?Что такое технология "клиент-сервер"?Какую работу выполняет сервер-программа электронной почты? :(

1 ответ:

casdrv [7]4 года назад

0 0

1) набор правил, обусловливающих порядка обмена информации в сети
2) набор программных средств 
3) схема соединения узлов сети 
4) программа для связи отдельных узлов сети

Читайте также

Что такое Паскаль и зачем он нужен?

bespalov [16]

Это язык программирования (по мне так довольно лёгкий). Обычно изучают в школах. Для серьёзных, больших программ не используется.

0 0

1 год назад

Составить алгоритм поиска четырёхзначного числа, начинающегося с единицы и такого, что если переставить эту цифру в конец записи

Сергей ГГ [2]

var x,y,z:Integer;

begin

for x:=1 to 9 do

for y:=0 to 9 do

for z:=0 to 9 do

if 3*(1000+x*100+y*10+z)=x*1000+y*100+z*10+1 then Writeln(1,x,y,z);

Readln;

end.

0 0

4 года назад

Дана строка содержащая любые символы кроме русских букв. Под "словом" будем понимать последовательность символов, ограниченную п

Andrea Alsopp [103]

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

function CalcWord(Stroka: string):integer;
begin
Result:=Stroka.ToWords.Where(w->w=w.Inverse).Count
end;

begin
var s:='казак пошел в кабак и сделал заказ';
Writeln('Слов-палиндромов: ',CalcWord(s))
end.

Результат
Слов-палиндромов: 5

Если однобуквенные слова не учитываются, надо изменить Where:
Where(w->(w=w.Inverse) and (w.Length>1))

0 0

3 года назад

Составить блок-схему алгоритма нахождения максим элемента, имеющего четное значение и не делящегося на 3 и вывести его порядковы

Tikitak [4]

/ * / * / * /
ответ во вложении

0 0

1 год назад

Много баллов дам за решение..Треугольник задан координатами вершин, вычеслить периметр, площадь.вычеслить длин сторон, оформить

Semen3P

Program gt;
var x1,y1,x2,y2,x3,y3,a,b,c,p,s:real;
procedure dlinastoron(x1,y1,x2,y2:real;var b:real);
begin
b:=sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
end;
procedure perimetr(a,b,c:real;var d:real);
begin
d:=a+b+c;
end;
procedure ploshad(a,b,c:real;var d:real);
var s:real;begins:=(a+b+c)/2;
d:=sqrt(s*(s-a)*(s-b)*(s-c));
end;
begin
readln(x1,y1,x2,y2,x3,y3);
dlinastoron(x1,y1,x2,y2,a);
dlinastoron(x1,y1,x3,y3,b);
dlinastoron(x3,y3,x2,y2,c);
perimetr(a,b,c,p);
ploshad(a,b,c,s);
writeln(a,' ',b,' ',c);
writeln(p);
writeln(s);
end.

0 0

4 года назад