Организация ввода и вывода данных с использованием файлов
1. Для выполнения операций с логическими данными в языке Паскаль используют обозначение
1) real
2) integer
3) char
4) boolean
2. Запишите, как на языках программирования называ¬ют число, определяющее количество позиций на экране, которые занимает выводимая величина.
Запишите, как на языках программирования называют запись алгоритмов.
4. Для выполнения операций с целочисленными данными в языке Паскаль используют обозначение
1) real
2) integer
3) char
4) boolean
5. После выполнения программы, записанной на языке Паскаль
program prim;
var s: integer;
begin s:=15;
write (‘s=’, s)
end.
на экран будет выведено
s:=15
s=15
‘s=’15
s= 15
Типовые задачи обработки массивов
1. Сколько единиц в двоичной записи десятичного числа 519?
2. Сколько нулей в двоичной записи десятичного числа 507?
3. Переведите в десятичную систему двоичное число 1010012.
4. Вычислите: 101011012 − 2558 + D16. ответ запишите в десятичной системе счисления. В ответе запишите только число, основание системы счисления писать не нужно.
5. Укажите наименьшее четырёхзначное шестнадцатеричное число, двоичная запись которого содержит ровно 6 нулей. В ответе запишите только само шестнадцатеричное число, основание системы счисления указывать не нужно.
Символьный тип данных
1. Какой тип данных в языке Pascal предназначен для хранения символьной информации?
1) byte
2) integer
3) real
4) char
2. Какой тип данных в языке Pascal предназначен для хранения строковой информации?
1) integer
2) char
3) string
4) byte
3. Что является результатом функций, предназначенных для выполнения операций над строками?
1) Только число.
2) Только строка.
3) Строка или число.
4. Функция для определения длины строки
1) ord(x)
2) length(x)
3) pred(x)
4) round(x)
5. Процедура УДАЛЯЕТ из строки ST участок, содержащий N символов с позиции P.
1) Delete(st,p,n)
2) val(st,p,n)
3) insert(st,p,n)
Объяснение:
Если и считать всё в двоичной системе, то надо сначала все числа перевести в неё.
Перевод из шестнадцатеричной в двоичную- каждая шестнадцатеричная цифра заменяется на четыре двоичных, затем незначащие нули спереди- отбрасываются:
10₁₆ = 00010000₂ = 10000₂
Перевод из восьмеричной в двоичную- каждая восьмеричная цифра заменяется на три двоичных, затем незначащие нули спереди- отбрасываются:
10₈ = 001000₂ = 1000₂
Получаем в итоге пример:
10000₂ + 1000₂ + 10₂* 10000₂ = 10000₂ + 1000₂ + 100000₂ =
= 111000₂
Var
f,s:text;
st,sp:string;
i:integer;
c:char;
begin
assign(s,'text1.txt');
reset(s);
while not Eof(s) do
begin;
readln(s,sp);
st:=st+sp+chr(10)+chr(13);
end;
close(s);
for i:=1 to length(st) div 2 do
begin
c:=st[i];
st[i]:=st[length(st)-i+1];
st[length(st)-i+1]:=c;
end;
assign(f,'text.txt');
rewrite(f);
write(f,st);
close(f);
end.
Текст в файле text1.txt:
Simple text
1And another simple text
2New text
Текст в файле text.txt:
txet weN2
txet elpmis rehtona dnA1
txet elpmiS