Особенности Языка Pascal

Как называется программа?

\(---------------------------------\)

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.

\(------------------------\)

Какое служебное слово объявляет данные  в разделе данных?

\(---------------------------------\)

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.

\(------------------------\)

Какое служебное слово объявляет блок  основных программных действий?

\(---------------------------------\)

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.

\(------------------------\)

Какие переменные объявлены в области данных? Укажите через пробел.

\(---------------------------------\)

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.

\(------------------------\)

Значение какой переменной вводится с клавиатуры?

\(---------------------------------\)

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.

\(------------------------\)

Что делает оператор   a := x div 100; ? 

\(---------------------------------\)

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.

\(------------------------\)

Что делает оператор   a := x div 100; ? 

Что делает оператор    c := x mod 10; ? 

\(---------------------------------\)

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; ? 

Оператор принимает значение переменной х := 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.

\(------------------------\)

Оператор принимает значение переменной х :=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.

\(------------------------\)

Оператор принимает значение переменной х :=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.

\(------------------------\)

Оператор принимает значение переменной х :=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.

\(------------------------\)

Оператор принимает значение переменной х :=472   выполняется действие s := a + b + c; ?  Что выведет строка writeln('s=', 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.

\(------------------------\)

Что выведет строка writeln('s=', s)? Запишите ответ без апострофов.

Оператор принимает значение переменной х :=183   Что выведет данная программа? Запишите ответ числом.

\(---------------------------------\)

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.

\(------------------------\)

Оператор принимает значение переменной х :=589   Что выведет данная программа? Запишите ответ числом.

\(---------------------------------\)

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.

\(------------------------\)

Какой тип переменных обрабатывает программа? Запиши ответ название.

\(---------------------------------\)

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.

\(------------------------\)

Какие служебные единицы в языке Pascal отвечают за вывод целой части числа?

Какие служебные единицы в языке Pascal отвечают за вывод остатка?

Какие служебные единицы в языке Pascal являются операциями на равне со знаками  + ,  * ,  / ,  -      ?

Какие служебные единицы в языке Pascal являются функциями?

Какие служебные единицы в языке Pascal работают только с типом данных integer?

Какие служебные единицы в языке Pascal работают  с типом данных real?