Тестирование по информатике «Начала программирования на языке Паскаль» (9–10 классы)

Вариант первый

Вариант второй

№1

Результат, какого из перечисленных ниже выражений, превышает число 20?

25 mod 20

20 mod 25

39 div 5

158 div 3

№1

Результат, какого из перечисленных ниже выражений, меньше числа 2?

39 mod 5

158 mod 3

25 div 20

20 div 5

№2

Перечислите через запятую номера выражений, которые относятся к вещественному типу данных.

sqrt (64)

frac(111,45)

int(444,6)

trunc(564,888)

round(15,75)

round(-621,435)

№2

Перечислите через запятую номера выражений, которые относятся к целому типу данных.

sqrt (64)

frac(111,45)

int(444,6)

trunc(564,888)

round(15,75)

round(-621,435)

№3

Что выведет программа, получив на вход числа 3, 5, 4?

var a, b, c:real;

begin

readln(a,b,c);

if sqr(a)+sqr(b)=sqr(c) then writeln('да') else writeln('нет');

end.

№3

Что выведет программа, получив на вход числа 3, 5, 4?

var a,b,c,d:real;

begin

readln(a,b,c);

if a>b then d:=a else d:=b;

if d>c then writeln(d) else writeln(c);

end.

№4

Определите для решения какой из перечисленных ниже задач используется приведенная программа

var a, b, c:real;

begin

readln(a,b,c);

writeln(sqr(b)-4*a*c);

end.

Нахождение объема параллелепипеда.

Определения площади треугольника (формула Герона).

Вычисления дискриминанта квадратного уравнения.

Нахождение среднего геометрического трех чисел

№4

Определите для решения какой из перечисленных ниже задач используется приведенная программа

var a, b, c:real;

begin

readln(a,b,c);

writeln(a*b*c);

end.

Нахождение среднего геометрического трех чисел

Нахождение объема параллелепипеда.

Определения площади треугольника (формула Герона).

Вычисления дискриминанта квадратного уравнения.

№5

Необходимо вывести число десятков целого числа, введенного пользователем с клавиатуры. Программа содержит ошибку.

Выпишите изменённую строку программы, чтобы ответ выводился верно.

var a : integer;

begin

readln(a);

write(a div 10);

end.

№5

Необходимо вывести число сотен целого числа, введенного пользователем с клавиатуры. Программа содержит ошибку.

Выпишите изменённую строку программы, чтобы ответ выводился верно.

var a : integer;

begin

readln(a);

write(a mod 1000);

end.

1

2

3

4

5

Первый вариант

4

1,2

нет

3

write((a mod 100) div 10);

Второй вариант

3

3,4,5,6

5

2

write((a mod 1000) div 100);