Составить программу вычисления функции на языке программирования высокого уровня QBasic">

1)

var a,b,x,y:longint;

begin

write("Vvedite nachalo i konec otrezka: ");

read(a,b);

write("Vvedite x: ");

read(x);

y:=sqr(x)*x;

if (y>a)and(y<b) then write("Na dannom otrezke znachenie funkcii ravno ",y) else write("Na dannom otrezke net reshenii");

readln

end.

2)

var c,i:byte;

begin

for i:=49 to 215 do

if (i mod 4=0) then c:=c+1;

write("Kolichestvo chisel, kratnyh 4 na zadannom promezhutke ravno ",c);

readln

end.

3)

var i:integer;

p:longint;

for i:=1000 to 9999 do

if (i mod 10=3) then p:=p*i;

write("Proizvedenie chetyrehznachnyh chisel, okanchivaushihsya na 3 ravno ",p);

readln

end.

4)

var i:byte;

c:integer;

begin

for i:=221 to 778 do

if ((i mod 10)=(i div 100)) then c:=c+1;

write("Kolichestvo chisel ravno ",c);

readln

end.

5)

var i:longint;

c:integer;

begin

for i:=10000 to 99999 do

if ((i mod 10)=(i div 10000))and(((i mod 100)div 10)=((i div 1000)mod 10)) then c:=c+1;

write("Kolichestvo chisel ravno ",c);

readln

end.

Для ка­ко­го из приведённых чисел ис­тин­но высказывание: НЕ (число < 20) И (число нечётное)?

НЕ (число < 20) И (число нечётное)

(число > = 20) И (число нечётное)

8 - не подходит, меньше 20

15 - не подходит, меньше 20

21 - подходит

36 - не подходит, четное

ответ - 3) 21

Для ка­ко­го из приведённых чисел ложно высказывание  НЕ (число > 50) ИЛИ (число чётное)?

НЕ (число > 50) ИЛИ (число чётное)

(число = < 50) ИЛИ (число чётное)

т.к. высказывание должно быть ложным, то обе части должны быть ложны, т.е.

(число > 50) И (число нечётное)

123 - подходит

56 - не подходит, четное

9 - не подходит, меньше 50

8 - не подходит, меньше 50

ответ - 1) 123

Для ка­ко­го из приведённых имён ложно высказывание:  НЕ (Первая буква гласная) ИЛИ НЕ (Последняя буква согласная)?

НЕ (Первая буква гласная) ИЛИ НЕ (Последняя буква согласная)

(Первая буква согласная) ИЛИ (Последняя буква гласная)

т.к. высказывание должно быть ложным, то обе части должны быть обе ложными, т.е.

(Первая буква гласная) И (Последняя буква согласная)

Эдуард - подходит

Ангелина - не подходит, последняя буква гласная

Карина - не подходит, первая буква согласная

Никон - не подходит, первая буква согласная

ответ - 1) Эдуард

Для ка­ко­го из приведённых имён ложно высказывание:  НЕ ((Первая буква гласная) И (Последняя буква согласная))?

НЕ ((Первая буква гласная) И (Последняя буква согласная))

(Первая буква согласная) И (Последняя буква гласная)

т.к. высказывание должно быть ложным, то обе части должны быть обе ложными, т.е.

(Первая буква гласная) И (Последняя буква согласная)

Валентина - не подходит, первая буква согласная

Герман - не подходит, первая буква согласная

Анастасия - не подходит, последняя буква гласная

Яков - подходит

ответ - 4) Яков

Для ка­ко­го из дан­ных слов ис­тин­но высказывание:  (ударение на пер­вый слог) И НЕ (количество букв чётное)?

(ударение на пер­вый слог) И НЕ (количество букв чётное)

(ударение на пер­вый слог) И (количество букв нечётное)

корова - не подходит, ударение на второй слог

козёл - не подходит, ударение на второй слог

кошка - подходит

конь - не подходит, кол-во букв чётное

ответ - 3) кошка

Для ка­ко­го из приведённых чисел ложно высказывание: НЕ (число > 30) ИЛИ (число чётное)?

НЕ (число > 30) ИЛИ (число чётное)

(число = < 30) ИЛИ (число чётное)

т.к. высказывание должно быть ложным, то обе части должны быть обе ложными, т.е.

(число > 30) И (число нечётное)

28 - не подходит, меньше 30

34 - не подходит, чётное

17 - не подходит, меньше 30

45 - подходит

ответ - 4) 45

Для ка­ко­го из приведённых чисел ис­тин­но высказывание:  НЕ (число > 10) И (число нечётное)?

НЕ (число > 10) И (число нечётное)

(число = < 10) И (число нечётное)

22 - не подходит, больше 10

13 - не подходит, больше 10

9 - подходит

6 - не подходит, чётное

ответ - 3) 9

Для какой из пе­ре­чис­лен­ных ниже фа­ми­лий рус­ских пи­са­те­лей и поэтов ис­тин­но высказывание:  НЕ (количество глас­ных букв нечётно) И НЕ (первая буква согласная)?

НЕ (количество глас­ных букв нечётно) И НЕ (первая буква согласная)

(количество глас­ных букв чётно) И (первая буква гласная)

Есенин - не подходит, нечётно кол-во гласных

Одоевский - подходит

Толстой - не подходит, первая согласная

Фет - не подходит, первая согласная

ответ - 2) Одо­ев­ский

Для ка­ко­го из приведённых зна­че­ний числа X ложно высказывание: НЕ (X = 5) ИЛИ (X > 6)?

НЕ (X = 5) ИЛИ (X > 6)

(X <> 5) ИЛИ (X > 6)

т.к. высказывание должно быть ложным, то обе части должны быть обе ложными, т.е.

(X = 5) ИЛИ (X < 6)

4 - не подходит

5 - подходит

6 - не подходит

7 - не подходит

ответ - 2) 5

Для ка­ко­го из дан­ных слов ис­тин­но высказывание  НЕ (третья буква гласная) И (последняя согласная)?

НЕ (третья буква гласная) И (последняя согласная)

(третья буква согласная) И (последняя согласная)

слива - не подходит, третья буква гласная

инжир - подходит

ананас - не подходит, третья буква гласная

киви - не подходит, последняя буква гласная

ответ - 2) инжир