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

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

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

№1

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

1. 25 mod 20
2. 20 mod 25
3. 39 div 5
4. 158 div 3

№1

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

1. 39 mod 5
2. 158 mod 3
3. 25 div 20
4. 20 div 5

№2

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

1. sqrt (64)
2. frac(111,45)
3. int(444,6)
4. trunc(564,888)
5. round(15,75)
6. round(-621,435)

№2

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

1. sqrt (64)
2. frac(111,45)
3. int(444,6)
4. trunc(564,888)
5. round(15,75)
6. 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.

1. Нахождение объема параллелепипеда.
2. Определения площади треугольника (формула Герона).
3. Вычисления дискриминанта квадратного уравнения.
4.  Нахождение среднего геометрического трех чисел

№4

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

var a, b, c:real;

begin

readln(a,b,c);

writeln(a*b*c);

end.

1. Нахождение среднего геометрического трех чисел
2. Нахождение объема параллелепипеда.
3. Определения площади треугольника (формула Герона).
4. Вычисления дискриминанта квадратного уравнения.

№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);