Глиф Учебники

Итоговый тест по Pascal

Pascal · 18 вопросов

Тест по всем урокам курса. Если ошиблись, загляните в урок по теме вопроса — пояснение подскажет, где искать.

1. Чем заканчивается программа на Pascal?
2. Какая запись присваивает переменной значение?
3. Какой тип выбрать для дробного числа 3.75?
4. Сумма может дойти до 100 000. Какой тип надёжнее, если программа должна работать и в Free Pascal?
5. Чему равны 17 div 5 и 17 mod 5?
6. Переменная n описана как integer. Что будет со строкой n := 7 / 2;?
7. Что выведет writeln((2 / 3):0:2)?
8. Что не так в этом коде?
Pascal
if a > b then
  writeln('a');
else
  writeln('b');
9. Как правильно записать условие «x больше 0 и меньше 10»?
10. Что выведет программа, если ввести 0?
Pascal
var
  m: integer;
begin
  readln(m);
  case m of
    1..5: writeln('мало');
    6..10: writeln('много');
  else
    writeln('нет такого');
  end;
end.
11. Что выведет программа?
Pascal
var
  i, s: integer;
begin
  s := 0;
  for i := 1 to 10 do
    if i mod 3 = 0 then
      s := s + i;
  writeln(s);
end.
12. Что выведет программа?
Pascal
var
  x: integer;
begin
  x := 1;
  while x < 50 do
    x := x * 3;
  writeln(x);
end.
13. Какой цикл выполнит своё тело хотя бы один раз, даже если условие сразу «не то»?
14. С чего правильно начинать поиск максимума в массиве a[1..n]?
15. Чему равно copy('Pascal', 1, 3)?
16. Что выведет программа?
Pascal
var
  x: integer;

procedure AddTwo(var n: integer);
begin
  n := n + 2;
end;

begin
  x := 5;
  AddTwo(x);
  writeln(x);
end.
17. Что выведет программа?
Pascal
function F(x: integer): integer;
begin
  F := x * 2 + 1;
end;

begin
  writeln(F(F(2)));
end.
18. Какие значения может вернуть random(10)?