С 1) Определите назначение цифр 8 и 9 в тексте:
«Казахстан официально является демократической, светской унитарной, конституционной
республикой разнообразным культурным наследие.01Местность Казахстана включает
равнины, степи, тайгу, скальные каньоны, колмы, дельты, заснеженные горы
пустыни.
В экономике доминирует углеводородная промышленность,
населения
в сфере услуг[9].»
а
занятость
максимальна
2) Опишите понятия ссылка и гиперссылка,
Ссылка
Гиперссылка

👇

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

Ответ:

qwertyroom

26.03.2021

а где задание? у меня его нету? или инет не работает

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

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

Ответ:

терменатор6

26.03.2021

Const
p = 3.14; //число "пи"

var
N: byte;
R, D, L, S: real;

begin
{Сообщаем кратко данные задачи: }
writeln(' Пусть в окружности:');
writeln(' 1)R - радиус;');
writeln(' 2)D - диаметр;');
writeln(' 3)L - длина;');
writeln(' 4)S - площадь круга.');
writeln;
writeln(' Введите номер одной из величин (от 1 до 4):');
write(' N = ');
readln(N); //Вводим номер величины.
{Здесь используем цикл. Запрашивается ввод до тех пор, пока
номер N не будет лежать в диапазоне [1, 4]:}
  while (N < 1)or(N > 4) do//Условие вхождения в цикл.
   begin
     writeln(' Такого номера здесь нет!');
     writeln(' Введите другой номер (от 1 до 4):');
     write(' N = ');
     readln(N) //Снова вводим номер.
   end;
writeln;
{Сообщаем о том, какую величину мы ввели,
а потом запрашиваем ввести её значение:}
write(' Это ');
  case N of
    1: begin
         writeln('радиус окружности. Введите его значение:');
         write(' R = ');
         readln(R)
       end;
    2: begin
         writeln('диаметр. Введите его значение:');
         write(' D = ');
         readln(D)
       end;
    3: begin
         writeln('длина окружности. Введите её значение:');
         write(' L = ');
         readln(L)
       end;
    4: begin
         writeln('площадь круга. Введите её значение:');
         write(' S = ');
         readln(S)
       end
  end;
writeln(' Тогда для остальных величин будем иметь:');
writeln;
{Используя соотношения D = 2*R, L = 2*p*R, S = p*sqr(R),
выразим последовательно три величины через четвертую: }
  case N of
    1: begin{Здесь дано R. Находим D, L и S: }
         writeln(' диметр: D = ', 2 * R);
         writeln(' длина: L = ', 2 * p * R);
         writeln(' площадь: S = ', p * sqr(R))
       end;
    2: begin{Здесь дано D. Находим R, L и S: }
         writeln(' радиус: R = ', D / 2);
         writeln(' длина: L = ', p * D);
         writeln(' площадь: S = ', p * sqr(D / 2))
       end;
    3: begin{Здесь дано L. Находим R, D и S: }
         writeln(' радиус: R = ', L / p / 2);
         writeln(' диаметр: D = ', L / p);
         writeln(' площадь: S = ', sqr(L) / p / 4 )
       end;
    4: begin{Здесь дано S. Находим R, D и L: }
         writeln(' радиус: R = ', sqrt(S / p):7:4);
         writeln(' диаметр: D = ', 2 * sqrt(S / p):7:4);
         writeln(' длина: L = ', 2 * sqrt(p * S):7:4)
       end
end
end.

4,6(21 оценок)

Ответ:

бабеков

26.03.2021

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

var s,a:string;
    begin
    write('Введите строку : ');
    readln(s);
    write('Введите слово : ');
    readln(a);
       if(pos(a, s) <> 0) then writeln('Слово "',a,'" в строке есть')
       else writeln('В строке такого слова нет');
    end.

Тест №1
Введите строку : Привет участникам олимпиады!
Введите слово : ник
Слово "ник" в строке есть

Тест №2
Введите строку : Всем привет!
Введите слово : админ
В строке такого слова нет

4,8(51 оценок)

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

Компьютеры-и-электроника

04.03.2021

Как добавить фон на веб-страницу: простые шаги, которые помогут улучшить визуальное восприятие...

Компьютеры-и-электроника

30.03.2020

Секреты изменения списка близких друзей Facebook на iPhone и iPad...

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

29.07.2020

Как замаскировать прыщик с помощью зеленого консилера: советы и рекомендации...

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