Тесты онлайн, бесплатный конструктор тестов. Психологические тестирования, тесты на проверку знаний.

Список вопросов базы знаний

Компьютерный практикум

Вопрос id:1467299
Команда Автоподбор используется для подбора
?) высоты строки
?) высоты ячейки
?) ширины столбца
?) ширины ячейки
Вопрос id:1467300
Перед вставкой таблицы в документ необходимо
?) указать место вставки таблицы
?) дать название создаваемой таблице
?) переместить курсор в начало документа
?) выполнить команду Вставить таблицу
Вопрос id:1467301
Перемещает курсор к предыдущей ячейке в таблице комбинация клавиш Shift +
Вопрос id:1467321
В тригонометрической форме записи заданного комплексного числа j равно (разделитель – точка)
Вопрос id:1467323
В языке Паскаль математической записи соответствует выражение
?) (2x+3y)/xy
?) (2*x+3*y)/(x*y)
?) 2*x+3*y/x*y
?) (2*x+3*y)/x*y
Вопрос id:1467324
В языке Паскаль операторы отделяются друг от друга
?) запятой
?) двоеточием
?) точкой
?) точкой с запятой
Вопрос id:1467346
Синтаксис оператора присваивания в языке Паскаль:
?) <Переменная>=<Выражение>
?) <Выражение>=<Переменная>;
?) <Переменная>:=<Выражение>
?) <Выражение>:=<Переменная>
Вопрос id:1467347
Стандартными процедурами ввода данных в языке Паскаль являются:
?) WriteLn
?) ReadLn
?) Read
?) Write
Вопрос id:1467348
Число знаков после запятой при выводе переменной X с помощью процедуры WriteLn(X:8:3) равно
?) 3
?) 11
?) 8
?) 5
Вопрос id:1467349

Текст программы, определяющей во введенном тексте количество символов, предшествующих двоеточию:

Const Q=':';

Var S:String;

D:Integer;

Begin

Write('Введите текст: '); Readln(S);

D:=Pos(Q,S);

If D<>0 Then Writeln('Количество символов перед двоеточием: ', ___ )

Else Writeln('Двоеточие в тексте отсутствует');

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467350

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

Const Str_1='0123456789!@#$%^&*()_+|{}:"<>?[];,./\';

Var Str:String;

i,kl:Integer;

Begin

Write('Введите текст: '); Readln(Str);

kl:=0;

For i:=1 to Length(Str) Do

If ___ <>0 Then Begin kl:=1; Break; End;

If kl=0 Then Writeln('Текст не содержит символы, отличные от букв и пробела')

Else Writeln('Текст содержит символы, отличные от букв и пробела');

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467351

Текст программы, определяющей, является ли введенный текст идентификатором (проверяется только первая буква текста):

Const Alph='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijlmnopqrstuvwxyz_';

Var S:String;

Begin

Write('Введите текст: '); Readln(S);

If ___ <>0 Then Writeln('Текст может быть идентификатором')

Else Writeln('Текст не является идентификатором');

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467352

Текст программы, выводящей на экран символы, расположенные во введенном тексте внутри скобок:

Const S1='(';

S2=')';

Var S:String;

k1,k2,k3:Integer;

Begin

Write('Введите текст: '); Readln(S);

k1:=Pos(S1,S)+1;

k2:=Pos(S2,S);

if (k2>k1) then k3:=k2-k1-1;

Writeln('Результат: ',Copy( ___ ));

End.

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

Вопрос id:1467353

Текст программы, заменяющей во введенном тексте двоеточие на точку с запятой:

Var Str:String;

i:Integer;

Begin

Write('Введите текст: ');

Readln(Str);

For i:=1 To ___ Do

If Str[i]=':' Then Str[i]:=';';

Writeln('Результат: ', Str);

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467354

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

Var S:String;

i:Integer;

Begin

Write('Введите текст: ');

Readln(S);

For i:=1 To Length(S) Do

If S[i]='.' Then ___ ;

Writeln('Результат: ', S);

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467355

Текст программы, определяющей длину введенной строки:

Var S:String;

D:Integer;

Begin

Write('Введите текст: ');

Readln(S);

D:= ___ ;

Writeln('Длина строки: ',D);

End.

Введите выражение (без пробелов, прописными буквами), вычисляющее длину введенной строки.

Вопрос id:1467356

Текст программы, определяющей длину введенной строки:

Var Str:String;

Begin

Write('Введите текст: ');

Readln(Str);

Writeln('Длина строки: ', ___ );

End.

Введите выражение (без пробелов, прописными буквами), вычисляющее длину введенной строки.

Вопрос id:1467357

Текст программы, определяющей длину первого слова введенной строки:

Var Str:String;

D:Integer;

Begin

Write('Введите текст: ');

Readln(Str);

D:=Pos(' ',Str);

Writeln('Длина первого слова текста: ' ___ ,);

End.

Введите выражение (без пробелов, прописными буквами), вычисляющее длину первого слова введенной строки.

Вопрос id:1467358

Текст программы, определяющей длину последнего слова введенной строки:

Var Str:String;

i,D:Integer;

Begin

Write('Введите текст: ');

Readln(Str);

For i:= ___ DownTo 1 Do

If Str[i]=' ' Then Begin D:=Length(Str)-i; Break; End;

Writeln('Длина последнего слова текста: ',D);

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467359

Текст программы, определяющей количество символов * во введенном тексте:

Var Str:String;

i,k:Integer;

Begin

Write('Введите текст: ');

Readln(Str);

k:=0;

For i:=1 To Length(Str) Do

If ___ ='*' Then k:=k+1;

Writeln('Количество символов * в тексте: ',k);

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467360

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

Const Q='abc';

Var G,T:String;

P,D:Integer;

Begin

Write('Введите текст: '); Readln(T); G := T;

P:= ___;

D:=0;

While P<>0 Do

Begin

D:=D+1;

Delete(T,3,P);

P:= ___;

End;

Writeln('Количество групп букв abc: ', D);

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467361

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

Const Q=' '; K='K';

Var V,G,T:String;

P,kol:Integer;

Begin

Write('Введите текст: '); Readln(T);

G:=T; kol:=0; P:=Pos(Q,T);

While P<>0 Do

Begin

V:=Copy(T,1,P-1); Writeln(V);

If ( ___ =K) Then kol:=kol+1;

Delete(T,1,P);

P:=Pos(Q,T);

End;

V:=T; Writeln(V);

If ( ___ =K) Then kol:=kol+1;

Writeln('Количество слов, начинающихся на букву K: ', kol);

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467362

Текст программы, определяющей, является ли введенный текст десятичной записью вещественного числа:

Const Str_1='0123456789.';

Var Str:String;

i,kl:Integer;

Begin

Write('Введите текст: '); Readln(Str);

kl:=0;

For i:=1 to Length(Str) Do

If ___ =0 Then Begin kl:=1; Break; End;

If kl=0 Then Writeln('Текст является десятичной записью вещественного числа')

Else Writeln('Текст не является десятичной записью вещественного числа');

End.

Введите пропущенное выражение (без пробелов, прописными буквами).

Вопрос id:1467363

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

Const S1='(';

S2=')';

Var S:String;

k1,k2,k3:Integer;

Begin

Write('Введите текст: '); Readln(S);

k1:=Pos(S1,S);

k2:=Pos(S2,S);

if (k2>k1) then

begin

k3:=k2-k1+1;

Delete(___);

end;

Writeln('Результат: ',S);

End.

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

Вопрос id:1467365
Для строковой переменной A верно составлено описание
?) VAR A : STRING[300];
?) VAR A : STRING[30] OF INTEGER;
?) VAR A : STRING(12);
?) VAR A : STRING;
Вопрос id:1467366
Осуществить в строке поиск определенного фрагмента можно с помощью функции
?) COPY
?) POS
?) LENGTH
?) UPCASE
Вопрос id:1467367
По умолчанию размер строки типа STRING принимается равным ___ символам (введите цифрами)
Вопрос id:1467368
Верно записан элемент одномерного массива
?) d(33)
?) b[0.5]
?) a[20*i]
?) c[1,0]
Вопрос id:1467369
___ - структура данных, которую можно рассматривать как набор переменных одинакового типа, имеющих общее имя
Вопрос id:1467371
Имеется описание типа данных массив TYPE ARR=ARRAY[5..15] OF INTEGER; VAR AR:ARR. Верно записаны элементы массива AR:
?) AR[18]
?) AR[3]
?) AR[2*3+7]
?) AR[11]
?) AR[2*3,7]
?) AR[5+2]
Вопрос id:1467372
Имеется описание типа данных массив TYPE ARR=ARRAY[1..15] OF INTEGER; VAR AR:ARR. Верно записан оператор вывода:
?) WRITE(AR[1]..AR[15]);
?) WRITE(AR[16]);
?) WRITE(AR[1],AR[5],AR[10]);
?) WRITE(AR);
?) WRITE(AR[5]);
?) WRITE([AR]);
Вопрос id:1467392
В языке Паскаль выход из цикла до завершения его работы осуществляет процедура
?) WHILE
?) BREAK
?) CONTINUE
?) REPEAT
Вопрос id:1467393
В языке Паскаль переход к следующей итерации, даже если предыдущая еще не завершена, осуществляет процедура
?) BREAK
?) EXIT
?) CONTINUE
?) HALT
Вопрос id:1467394
Для организации выхода из цикла в языке Паскаль используются стандартные процедуры:
?) BREAK
?) IF
?) CONTINUE
?) REPEAT
Вопрос id:1467395
Если циклическая вычислительная структура содержит в себе другую циклическую структуру, то такие циклы называются ___
Вопрос id:1467396
Организовать выход из цикла можно, воспользовавшись оператором безусловного перехода ___
Вопрос id:1467417
В языке программирования Паскаль метка должна быть описана в разделе описания меток программы, который начинается ключевым словом ___
Вопрос id:1467418
Наименьший номер последовательности 1+1/2, 1+1/2+1/3, 1+1/2+1/3+1/4,…, значение которого больше 4 (разделитель в числе – точка)
Вопрос id:1467419
Наименьший номер последовательности, для которого значение функции 1/x+1/x2+1/x3+1/x4 + … больше 10, при x=0,9 (разделитель в числе – точка)
Вопрос id:1467420
Наименьший номер последовательности, для которого значение функции z = xk / k больше 5000, если k = 1, 2, 3, …, x=3
Вопрос id:1467421
Наименьший номер последовательности, для которого значение функции меньше 0,01, если k = 1, 2, 3, … (разделитель в числе – точка)
Вопрос id:1467422
Наименьший номер последовательности, для которого значение функции меньше 0,01, если k = 1, 2, 3, … (разделитель в числе – точка)
Вопрос id:1467427
Повторение последовательности операторов с проверкой условия в начале каждого прохода цикла называется ___
Вопрос id:1467428
Принудительный выход из цикла в программе на Паскале можно организовать, используя оператор
?) цикла с параметром
?) присваивания
?) безусловного перехода
?) постусловия
Вопрос id:1467435
Укажите соответствие между оператором цикла языка программирования Паскаль и его синтаксисом
Левая частьПравая часть
Оператор цикла с параметром
Repeat <последовательность операторов> Until <логическое выражение>;
Оператор безусловного перехода
For <идентификатор> := <выражение1> To <выражение2> Do <оператор>;
Оператора цикла с предусловием
Goto <Метка>;
Оператор цикла с постусловием
While <логическое выражение> Do <оператор>;
Вопрос id:1467436
Форма записи, в которой каждый следующий элемент расчета может быть получен из предыдущего, называется формой ___
Вопрос id:1467442
Заранее известно число повторений в цикле с
?) параметром
?) постусловием
?) начальным условием
?) предусловием
Вопрос id:1467443
Значение при n=23 (разделитель – точка)
Вопрос id:1467444
Значение при n=62 (разделитель – точка)
Вопрос id:1467445
Значение при n=15 (разделитель – точка)
Copyright testserver.pro 2013-2024