aguliaeva
?>

A collection of servers connected to theWorld Wide Web where you can store your files and in some cases to install theapplication:A) Software.B) Cloud.C) Server.D) Computer.E) Mobil.$$$ 177Datacenters include:A)Self-service on demandB) ResourcepoolingC)ElasticityD) Highlyreliable server hardwareE)Universal access network$$$ 178Multimedia is:A) Only videoand text information.B) Engineeringcircuits, utilities.C) Text, graphics, and electronic information.D) Effects andspecial programs.E) Video andtext.F) Combinationof sound and graphics.G) Animation.H) Operatingsystem software.$$$ 179Every computerconnected to the Internet is called:A) Node.B) Servers.C) Protocol.D) Clients.E) Data center.F) Domain NameSystem.$$$ 180Some nodes whichprovide to other nodes programs and data:A) Node.B) Servers.C) Protocol.D) Clients.E) Data center.F) Domain Name System.$$$ 181Other computerswhich use the information provided by the server:A) Node.B) Servers.C) Protocol.D) Clients.E) Data center.F) Domain NameSystem.​

Информатика

Ответы

Chausmonk4
Uses crt;

const
    n = 5;
    m = 10; {кол-во столбцов}
    l = 10; {максимальная длина одной строки/слова}
    {letters = '';}
    file_path = 'data.txt';

type
    SmallString = string[l];
    WordsMas = array[1..n, 1..m] of SmallString;

var
    words: WordsMas;
    i, j, k: integer;

function RandomWord(n: integer): SmallString;
var
    i: integer;
    s: SmallString;
    letters: string;
begin
    letters := '';
    s := '';
    for i := 1 to n do 
        s := s + letters[Random(length(letters) - 1) + 1];
    RandomWord := s;
end;

function Replace(s, find_text, replace_text: SmallString): SmallString;
var
    i: integer;
begin
    repeat
        i := pos(find_text, s);
        if i <> 0 then begin
            delete(s, i, length(find_text));
            insert(replace_text, s, i);
        end;
    until i = 0;
    
    Replace := s;
end;

function Invert(s: SmallString): SmallString;
var
    i: integer;
    t: SmallString;
begin
    t := '';
    for i := 1 to length(s) do
        t := s[i] + t;
    
    Invert := t;
end;

function SwapCase(s: SmallString): SmallString;
var
    i: integer;
begin
    for i := 1 to length(s) do
        if s[i] = upcase(s[i]) then
            s[i] := chr(ord(s[i]) + 32)
        else s[i] := upcase(s[i]);
    
    SwapCase := s;
end;

procedure PrintMas(mas: WordsMas; name: string);
var
    i, j: integer;
    f: text;
begin
    writeln(name);
    for i := 1 to n do
    begin
        
        write(i, ': ');
        for j := 1 to m do
            write(mas[i, j]:l, '; ');
        writeln;
    end;
    
    Assign(f, file_path);
    Append(f);
    
    writeln(f, name);
    for i := 1 to n do
    begin
        
        write(f, i, ': ');
        for j := 1 to m do
            write(f, mas[i, j]:l, '; ');
        writeln(f);
    end;
    
    Close(f);
end;

begin
    Randomize;
    ClrScr;
    
    for i := 1 to n do
        for j := 1 to m do
            words[i, j] := RandomWord(Random(l - 5) + 5);
            {words[i, j] := 'GoodXXMMNN';}
    
    PrintMas(words, 'Original');
    
    for i := 1 to n do
        for j := 1 to m do
            case i of
                1: words[i, j] := Replace(words[i, j], 'N', 'X');
                2: words[i, j] := Replace(words[i, j], 'X', 'M');
                3: words[i, j] := Invert(words[i, j]);
                4: words[i, j] := SwapCase(words[i, j]);
            end;
    
    PrintMas(words, 'New One');
    
    Readln;
end.

Проверялось. Работает на Турбо паскале
igevskoemuseumkec
Согласен) Без ума тут никак. У Вас дана структура, в которой есть три поля целочисленного типа и два поля строкового типа. Для работы со структурой, необходимо изначально создать хотя бы один объект данной структуры (music first;), где first - имя объекта, music - тип данных, то есть Ваша структура. После этого открывается доступ к полям объекта. Чтобы обратиться к какому-либо полю, необходимо использовать подобную конструкцию  first.numb или first.autor и так далее. Чтобы Вам было проще, можно показать это на примере. Можно заполнить поля std::cin >> first.numb, а так же можно его вывести на экран std::cout << first.numb. По сути, это обычные переменные, но отличает их только то, что они связаны, это позволяет описывать какие либо сущности из реального мира.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

A collection of servers connected to theWorld Wide Web where you can store your files and in some cases to install theapplication:A) Software.B) Cloud.C) Server.D) Computer.E) Mobil.$$$ 177Datacenters include:A)Self-service on demandB) ResourcepoolingC)ElasticityD) Highlyreliable server hardwareE)Universal access network$$$ 178Multimedia is:A) Only videoand text information.B) Engineeringcircuits, utilities.C) Text, graphics, and electronic information.D) Effects andspecial programs.E) Video andtext.F) Combinationof sound and graphics.G) Animation.H) Operatingsystem software.$$$ 179Every computerconnected to the Internet is called:A) Node.B) Servers.C) Protocol.D) Clients.E) Data center.F) Domain NameSystem.$$$ 180Some nodes whichprovide to other nodes programs and data:A) Node.B) Servers.C) Protocol.D) Clients.E) Data center.F) Domain Name System.$$$ 181Other computerswhich use the information provided by the server:A) Node.B) Servers.C) Protocol.D) Clients.E) Data center.F) Domain NameSystem.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Владимировна Екатерина
Batishcheva
alenih13
lzelenyi5
natapetrova20017
maryshecka
moisalexx7
Васильевна Владимирович
1сор по информатике 6 класс 3 четверть
mahalama7359
kovansckaya201313
dyatchina63
ckati
TrubnikovKlimenok926
laplena1982750
radatailless