В поточному полі потрібно знайти слово "інформатика", що міститься на початку поля. Вкажіть елемент керування, який дозволяє встановити відповідний параметр пошуку.

В поточному полі потрібно знайти слово інформатика, що міститься на початку поля. Вкажіть елемент

Показать ответ

Ответ:

натали524

31.12.2022 02:56

Program YouName;

Uses crt; // Использование модуля crt.

Const e = 2.71828; // Объявление константы e.

Var // Раздел для описания переменных.

m,n: Integer; // Объявляем целочисленные переменные.

x,u,y: Single; // Объявляем дробные переменные.

Label check1, check2; // Объявляем метки для оператора Goto.

Begin // Начало "тела" программы.

check1: // Метка для без условного перехода с оператора Goto.

write('Введите m: '); // Вывод текстового сообщения на экран консоли.

// {$I-} - это деректива, которая перехватывает вывод ошибок.

// т.e., если во время выполнение программы между {$I-} и {$I+} не будет ошибок,

// то значение IOResult будет равно 0. Если во время выполения программы произойдет ошибка,

// то программа не остановится, а задаст значение IOResult неравное 0.

// {$I+} соответственно отключает дерективу.

{$I-} // Включение директивы.

readln(m); // Ввод значения переменной m.

{$I+} // Отключение директивы

If IOResult <> 0 then // Если IOResult не равно 0 (т.е есть ошибки во время включенной директивы $I), то..

Begin // Начало подпрограммы.

writeln('Вы ввели неизвестный символ.'); // Вывод текстового сообщения на экран консоли.

writeln('Введите число'); // Вывод текстового сообщения на экран консоли.

Goto check1; // Переход на метку check1

End; // Конец подпрограммы.

check2: // Метка для без условного перехода с оператора Goto.

write('Введите n: '); // Вывод текстового сообщения на экран консоли.

{$I-} // Включение директивы.

readln(n); // Ввод значения переменной n.

{$I+} // Отключение директивы.

If IOResult <> 0 then // Если IOResult не равно 0 (т.е есть ошибки во время включенной директивы $I), то..

Begin // Начало подпрограммы.

writeln('Вы ввели неизвестный символ.'); // Вывод текстового сообщения на экран консоли.

writeln('Введите число'); // Вывод текстового сообщения на экран консоли.

Goto check2; // Переход на метку check2

End; // Конец подпрограммы.

x:=(m*n-exp(ln(e)*((-m)*0.7)))/(2.67); // Вычисление x

y:=ln(2)*(m+1); // Вычисление y

u:=0.125*sqrt(x/y)+exp(ln(e)*cos(x-y)); // Вычисление u

writeln(u:0:4); // Вывод текстового сообщения на экран консоли.

// u:0:4 - это задает переменной u четыре знака после запятой.

End. // Конец "тела" программы.

0,0(0 оценок)

Ответ:

vitahoptaska343

15.10.2022 04:15

Im dont no

Объяснение:

Im dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont noIm dont no

0,0(0 оценок)

Популярные вопросы: Информатика