Организация ввода и вывода данных язык Паскаль
Список вопросов теста
Вопрос 1
Имя программы?
program n_4;
var
x, a, b, c, s: integer;
begin
writeln('Нахождение суммы цифр трёхзначного числа');
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Вопрос 2
Какие переменные объявлены в области данных? Укажите через пробел.
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
−−−−−−−−−−−−−−−−−−−−−−−−
Вопрос 3
Значение какой переменной вводится с клавиатуры?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Вопрос 4
Какое служебное слово объявляет переменные в разделе данных?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Варианты ответов
- begin
- var
- writeln
- readln
Вопрос 5
Какое служебное слово объявляет блок основных программных действий?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Варианты ответов
- var
- begin
- writeln
- readln
Вопрос 6
Что делает оператор a := x div 100; ?
Варианты ответов
- делит число на n-любое число
- делит число на n-любое число и выводит целую часть
- делит число на n-любое число и выводит дробную часть
- делит число на n-любое число и выводит остаток
Вопрос 7
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
−−−−−−−−−−−−−−−−−−−−−−−−
Что делает оператор c := x mod 10; ?
Варианты ответов
- делит число на n-любое число
- делит число на n-любое число и выодит целую часть
- делит число на n-любое число и выводит дробную часть
- делит число на n-любое число и выводит остаток
Вопрос 8
Оператор принимает значение переменной х :=472 . Какое значение будет присвоено переменной с ?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Вопрос 9
Оператор принимает значение переменной х := 472. Какое значение будет присвоено переменной a ?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Вопрос 10
Оператор принимает значение переменной х :=472. Какое значение будет присвоено переменной b ?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Вопрос 11
Оператор принимает значение переменной х :=472 . Какое значение будет присвоено переменной s ?
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Вопрос 12
Оператор принимает значение переменной х :=742 выполняется действие s := a + c; ? Что выведет строка writeln('s=', s)? Запишите ответ без апострофов.
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
write('Введите исходное число>>');
readln(x);
a := x div 100;
c := x mod 10;
s := a + c;
writeln('s=', s)
end.
−−−−−−−−−−−−−−−−−−−−−−−−
Что выведет строка writeln('s=', s)? Запишите ответ без апострофов.
Вопрос 13
Какой тип переменных обрабатывает программа? Запиши ответ название.
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
program n_4;
var
x, a, b, c, s: integer;
begin
writeln('Нахождение суммы цифр трёхзначного числа');
write('Введите исходное число>>');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
Варианты ответов
- целый
- вещественный
- integer
- real
Вопрос 14
Как записывается оператор вывода?
Варианты ответов
- Writeln ()
- Readkey()
- Readln()
Вопрос 15
Как записывается оператор присвоения?
Варианты ответов
- а:=1;
- а=1;
- а=:1;