Контрольна робота з теми "Алгоритми та програми"

Додано: 23 квітня 2020
Предмет: Інформатика, 8 клас
Тест виконано: 73 рази
12 запитань
Запитання 1

Ціле або дробове число , рядок символів або окремий символ , логічне значення -

варіанти відповідей

Іменована константа

Звичайна константа

Запитання 2

Запишіть призначення функції FloatToStr

варіанти відповідей

Перетворює ціле число на рядок

Перетворює рядок на ціле число

Перетворює дійсне число на рядок

Перетворює рядок на дійсне число

Запитання 3

Обчисліть значення виразу: 123 div 10 mod 10 =

варіанти відповідей

3

2

1

0

Запитання 4

Оберіть правильний запис синтаксису функції InputBox



варіанти відповідей

 Value:=InputBox(Заголовок, підказка, значення, функція)

Value:=InputBox(Заголовок, підказка, значення)

Value:=InpatBox(Заголовок, підказка, значення)

Запитання 5

Обчисліть Sqrt (625) =

варіанти відповідей

25

625

5

390625

Запитання 6

Оберіть правильний запис функції мовою Object Pascal

варіанти відповідей

12*x+6/15x*y*2

(12*x+6)/(15*x*y*y)

 (12x+6)/(15xsqr(y))

(12*x+6)/15*x+y*y

Запитання 7

Оберіть схему умовного оператора If...Then

варіанти відповідей
Запитання 8

Виконайте фрагмент програмного коду для початкових значень А=3, В=5


If A<0 Then

if A>B Then A:=B

Else B:=A

Else if A>B Then B:=A

Else A:=B;

варіанти відповідей

А=-3 В=-3

А=5 В=5

А=3 В=3

А=3 В=5

Запитання 9

Виконати фрагмент програмного коду з початковим значенням А=88


Case A mod 10 of

0..3: A:=A*2;

4..5: A:=A+10;

6..9: A:=A*10;

end;

варіанти відповідей

A=166

A=98

A=8

A=880

Запитання 10

На малюнку надано схему алгоритму. Оберіть його назву

варіанти відповідей

Цикл із післяумовою

Цикл із передумовою

Алгоритм з розгалуженням

Запитання 11

Оберіть правильний запис фрагменту програмного коду для побудови трикутника із вершинами в точках (100,100), (200, 200), (100, 200)

варіанти відповідей

begin

 Image1.Canvas.Brush.Color:=clWhite;

 Image1.Canvas.Pen.Color:=clBlack;

 Image1.Canvas.FillRect(Image1.ClientRect);

 Image1.Canvas.LineTo (200, 200);

 Image1.Canvas.LineTo (100, 100);

 Image1.Canvas.LineTo (100, 200);

end;           

begin

 Image1.Canvas.Brush.Color:=clWhite;

 Image1.Canvas.Pen.Color:=clBlack;

 Image1.Canvas.FillRect(Image1.ClientRect);

 Image1.Canvas.MoveTo (100,200);

 Image1.Canvas.LineTo (200, 200);

 Image1.Canvas.LineTo (100, 100);

 Image1.Canvas.LineTo (100, 200);

end;           

begin

 Image1.Canvas.Brush.Color:=clWhite;

 Image1.Canvas.Pen.Color:=clBlack;

 Image1.Canvas.FillRect(Image1.ClientRect);

 Image1.Canvas.MoveTo (100,200);

 Image1.Canvas.MoveTo (200, 200);

 Image1.Canvas.MoveTo (100, 100);

 Image1.Canvas.MoveTo (100, 200);

end;           

begin

 Image1.Canvas.Brush.Color:=clWhite;

 Image1.Canvas.Pen.Color:=clBlack;

 Image1.Canvas.FillRect(Image1.ClientRect);

 Image1.Canvas.LineTo (100,200);

 Image1.Canvas.LineTo (200, 200);

 Image1.Canvas.LineTo (100, 100);

 Image1.Canvas.LineTo (100, 200);

end;           

Запитання 12

Оберіть варіант, в якому правильно надано фрагмент програмного коду

варіанти відповідей

Pen.Color:= RGBСolor (128,64,0);

Brush.Color:= RGBColor (128,64,0);

 Pen.Color:= Color (128,64,0);

Brush.Color:=Color (128,64,0);

Pen.Color:= RGBToColor (128,64,0);

Brush.Color:= RGBToColor (128,64,0);

Створюйте онлайн-тести
для контролю знань і залучення учнів
до активної роботи у класі та вдома

Створити тест