Вопрос1

Что выполняет команда MS-DOS (укажите правильный ответ)

DEL fs*.* ?

1) стирает в текущей директории все файлы

2) стирает в корневом каталоге все файлы

Правильно 3) стирает файлы в текущей директории, начинающиеся с fs с любым расширением

4) стирает файлы в текущей директории, начинающиеся с fs и расширением TXT

5) стирает файлы в текущей директории только с именем fs и любым расширением

6) стирает файлы в текущей директории только с именем fs и расширением ТХТ

Вопрос2

Что выполняет команда MS-DOS (укажите правильный ответ)

copy fs*.* *.txt ?

1) копирует все файлы из текущей директории в корневую директорию

2) копирует все файлы из текущей директории в эту же директорию с тем же именем

3) копирует все файлы из текущей директории с именем, начинающимся на fs с любым расширением, в эту же директорию с тем же именем и расширением

Правильно 4) копирует все файлы из текущей директории с именем, начинающимся на fs с любым расширением, в эту же директорию с тем же именем и расширением TXT

5) копирует файлы из текущей директории только с именем на fs с любым расширением в эту же директорию с тем же именем и расширением

6) копирует файлы из текущей директории только с именем на fs с любым расширением в эту же директорию с тем же именем и расширением TXT

Вопрос3

Написать полный путь доступа к файлу MY_FILE.TPP, находящемуся в директории PAS_TP (имя файла и путь писать заглавными буквами).

"

Ответ (D:\LANG\PAS\PAS_TP\MY_FILE.TPP)

Вопрос4

Написать команду MS-DOS удаления файла DOG.TXT директории DOGOVOR1, находясь в директории FOX (писать заглавными буквами).

"

Ответ (DEL,D:\TXT\DOC\DOGOVOR\DOGOVOR1\DOG.TXT)

Вопрос5

Написать команду MS-DOS копирования файла MY_FOX.FXX из директории FOX в директорию LAB_RA с новым именем MY_LAB.LBB (писать заглавными буквами).

"

Ответ (COPY,D:\LANG\FOX\MY_FOX.FXX,D:\TXT\DOC\LAB_RA\MY_LAB.LBB)

Вопрос6

Написать команду MS-DOS удаления всех файлов в директории PAS, находясь в корневой директории (писать заглавными буквами).

"

Ответ (DEL,D:\LANG\PAS\*.*)

Совместимость типов.

Вопрос1

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 r1:=5.5;

8 r2:=r1+6;

9 c1:='A';

10 c2:=c1;

11 s1:='TOMSK';

12 s2:=r2;

Введите номер строки, в которой находится ошибка.

Ответ (12)

Вопрос2

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 r1:=15.5;

8 s2:=r2;

9 r2:=r1-16;

10 s1:='TUSUR';

11 s2:=s1+S1;

12 s1:='ABCD'+'A';

Введите номер строки, в которой находится ошибка.

Ответ (8)

Вопрос3

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 r1:=5.5;

8 r2:=r1*r1/2;

9 s1:='A';

10 c1:=S1+'ASDF';

11 s2:=s1;

Введите номер строки, в которой находится ошибка.

Ответ (10)

Вопрос4

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 r1:=5.115;

8 r2:=6;

9 c1:='A';

10 s1:=r1+'ASDFG';

11 s2:=s1;

12 c1:='a';

Введите номер строки, в которой находится ошибка.

Ответ (10)

Вопрос5

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 c1:='#';

8 c2:='D';

9 j:=55;

10 c2:=c1;

11 s1:=c1+c2;

12 s2:=s1+c2;

Введите номер строки, в которой находится ошибка.

Ответ (5)

Вопрос6

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 c1:='f'+'s';

8 r1:=6+4.6;

9 c2:=c1;

10 i:=44*2;

11 j:=i*2;

12 s2:=c2;

Введите номер строки, в которой находится ошибка.

Ответ (7)

Вопрос7

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,r1 :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 r1:=5.5;

8 r2:=r1+6;

9 c1:='A';

10 c2:=c1;

11 s1:='TOMSK';

12 s2:=s2;

Введите номер строки, в которой находится ошибка.

Ответ (3)

Вопрос8

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 r1:=5.5;

8 r2:=r1+6;

9 c1:='A';

10 j:=r1+4;

11 i:=0;

12 s2:=' ';

Введите номер строки, в которой находится ошибка.

Ответ (10)

Вопрос9

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 c1:='6';

8 c2:='66';

9 r1:=666.8798;

10 r2:=2/3+55/66;

11 i:=44;

12 j:=i*(6+7);

Введите номер строки, в которой находится ошибка.

Ответ (8)

Вопрос10

Задан фрагмент программы:

1 Var

2 r1,r2:real;

3 i,j :integer;

4 c1,c2:char;

5 s1,s2:string;

6 begin

7 j:=5;

8 j:=j*5+4;

9 c1:='A';

10 c2:='A'+'B';

11 s1:='asda'+'asda';

12 s2:=s1;

Введите номер строки, в которой находится ошибка.

Ответ (10)

Арифметические выражения.

Вопрос1

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln((5+2)*2+(4+8)*2-22/2:2:0);

Ответ (27)

Вопрос2

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln(12/3/4+15/3*2+3:2:0);

Ответ (14)

Вопрос3

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln(12/4*2+(36/3+2)/7:1:0);

Ответ (8)

Вопрос4

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln((3+2)*3*(6+9)/5:2:0);

Ответ (45)

Вопрос5

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln(128/4/2/2/2+5:1:0);

Ответ (9)

Вопрос6

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln(128/4/(2/2/2)+5.0:2:0);

Ответ (69)

Вопрос7

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln((23+13)/3+(9+3)/4:2:0);

Ответ (15)

Вопрос8

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln((33-3)/20-(55+5)/(7-1):4:1);

Ответ key,=+ end(-8+{.+,}+5)

Вопрос9

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln((12+8)*2/4-(6+9)/3*12:3:0);

Ответ (-50)

Вопрос10

Введите, какое числовое значение выведется на экран оператором Writeln?

Writeln(4*2*8/(33-1)+(2-7)/5+3:1:0);

Ответ (4)

Логические выражения.

Вопрос1

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln((5 > 4) and (10 <= 8) or l1 );

1) TRUE

Правильно 2) FALSE

Вопрос2

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln((3 < 10) and (6 > 12) and (10 >= 5) );

1) TRUE

Правильно 2) FALSE

Вопрос3

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln((5 >= 5) or (l1 and l2) );

Правильно 1) TRUE

2) FALSE

Вопрос4

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln((5.6 < 10.2) and (6 >= 1) or (3 = 3) );

Правильно 1) TRUE

2) FALSE

Вопрос5

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln((4 < > 4) or (l1 and l2) or l1 );

1) TRUE

Правильно 2) FALSE

Вопрос6

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln((5 <= 5) and (l2 and (5 > 0) and (l1 or l2)) );

Правильно 1) TRUE

2) FALSE

Вопрос7

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln(('A'< >'T') and (33 > 3) and (l1 and l2) );

1) TRUE

Правильно 2) FALSE

Вопрос8

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln(('A'='B') and (6 > 3) or (3 >= 3) );

Правильно 1) TRUE

2) FALSE

Вопрос9

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln(('A'< >'B') or (3 = 7) or (3 > 7) );

Правильно 1) TRUE

2) FALSE

Вопрос10

Какое логическое значение (TRUE или FALSE) выведется на экран оператором вывода Writeln, если значения логических переменных l1:=FALSE и l2:=TRUE?

Writeln(('D'='d') and ((3 > 10) or ('F'='F')) );

1) TRUE

Правильно 2) FALSE

Форматированный вывод.

Вопрос1

Заданы переменные

целочисленные: i:=3; j:=10; k:=255;

вещественные: r1:=15.53; r2:=155.57;

символьные: c1:='D'; c2:='F';

строковые: s1:='IVANOV'; s2:='TUSUR';

Написать, что выведет оператор Writeln на экран?

Writeln(i,j,k:5,s1:10,s2,r1:5:2,r2:10:3,'SW',c1);

Вместо пробела при вводе ответа набирайте восклицательный знак !

Ответ (310!!255!!!!IVANOV,TUSUR15.53!!!155.570SWD)