Иванович
?>

Надо написать программу в free pascal. по данному значению x вычислите функции y, учитывая область определения функции. y=(16*x^2 / x-2)+3 /-это дробь

Информатика

Ответы

nevzorova

varx: integer; y: real; beginwriteln('vvedite x'); readln(x); if (x> 0) and (x< > 2) or (x< 0) thenbeginy: =(16*sqr(x))/(x-2)+3; writeln('y = ',y: 2: 2); endelsewriteln('x ne vxodit v oblast opredeleniya'); end.

lenskiy

Відповідь:

uses crt;  {модуль CRT, для красоты}

var x,y:integer;  {описание переменных}

begin

write('Введи трехзначное число:'); {вывод текста на экран}

readln(x); {Чтение данных}

write('Введи любую цифру:'); {Вывод текста на экран}

readln(y);  { Чтение данных }

if (x<100) or (x>999) or (y<0) or (y>9)  {проверка условий}   

then writeln('ERROR!')  {Вывод текста, если условие соблюдено}

else  {Вариант, если в начале все числа введено верно}

   if (y=x div 100) or (y=x mod 10) or (y=x mod 100 div 10) then

      writeln ('Цифра присутствует') {Вывод текста, если условие соблюдено}

   else writeln ('Такой цифры нет');  { Вывод текста, если условие не соблюдено }

Пояснення:

Sokolova-Shcherbakov

1)Язык программирования Pascal создал:

1.Н. Вирт

2.Б. Паскаль

3.М. Фортран

2) Линейная структура построения программы подразумевает

1.Неоднократное повторение отдельных частей программы

2.Последовательное выполнение всех элементов прЛинейная структура построения программы подразумевает

3.Выполнение лишь нескольких, удовлетворяющих заданному условию частей программы

3) Команда CLRSCR служит для

1.ожидания нажатия клавиши

2.ввода данных с экрана

3.очистки экрана

4) раздел VAR служит

1.Для описания используемых переменных

2.Для описания величин

3.Для описания выражений

5)Переменные – это:

1.величины, которые могут менять свое значение в процессе выполнения программы

2.величины, которые не могут менять своего значения в процессе выполнения программы

3.обозначают строки программы, на которые передается управление во время выполнение программы

6) целочисленное деление можно выразить следующей функцией:

1.A mod B

2.A div B

3.Abs (A)*B

7) раздел операторов начинается служебным словом:

1.VAR

2.INTEGER

3.BEGIN

8) ввод данных с клавиатуры осуществляется с оператора:

1.WRITE, WRITELN

2.READ, READLN

3.PROGRAM

9)вывод данных на экран осуществляется с оператора:

1.WRITE, WRITELN

2.READ, READLN

3.PROGRAM

10) тип переменных REAL это:

1.целочисленный тип

2.логический тип

3.натуральный тип

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

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

Надо написать программу в free pascal. по данному значению x вычислите функции y, учитывая область определения функции. y=(16*x^2 / x-2)+3 /-это дробь
Ваше имя (никнейм)*
Email*
Комментарий*

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

АлександрАлександровна
CafedeMinou
Раисовна878
Chernaya
kirill76536
Drugov_Vladimirovna
pechinin
kate1610
АндреевичАндрей
keldastrand
des-32463
Alyona744
agaloan8
npprang21
fedorenkoroman