Тест по теме Оператор ветвления

Автор публикации:

Дата публикации:

Краткое описание: ...


Тест по теме: «Оператор ветвления»

  1. Укажите значение величины S после выполнения следующих команд:

S:=7; S:=23; S:=S+6;

  1. В программе использован оператор ветвления.


If x>=3 then writeln (‘Зачет’) else writeln (‘Незачет’);

Какое значение будет выведено на экран дисплея, если x=7.

  1. В программе использован оператор ветвления.


If x<1000 then writeln (‘да’) else writeln (‘нет’);

Какое значение будет выведено на экран дисплея, если Х=70.


  1. Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 7?


Program Primer1;

var a, b, p: integer;

Begin

writeln (‘Введите a’);

readln (a);

if (a>=7)

then begin

b:=3;

p:=a*a+b*b;

end

Else begin

b:=5;

p:=(a+b)*(a+b);

end;

writeln (‘ p=’, p);

End.

  1. В программе использован оператор ветвления.

If a>=b then

begin

c:=a;

a:=b;

b:=c;

end

else b:=1;

writeln (a,b);

Какое значение будет выведено на экран дисплея, если a=10, b=20?

Задачи:

1. Написать программу, определяющую по заданному числу месяца, время года. Например, если вводим 1, то на экране выводится - зима;

если вводим 5, то на экране выводится – весна и т.д.

2. Дана функция, определить ее результат, если

[pic]

3. Даны угля треугольника, определить:

- можно ли построить треугольник;

- тип треугольника ( остроугольный, прямоугольный, тупоугольный, равносторонний, равнобедренный, прямоугольный).


Тест по теме: «Оператор ветвления»

  1. Укажите значение величины S после выполнения следующих команд:

S:=7; S:=23; S:=S+6;

  1. В программе использован оператор ветвления.


If x>=3 then writeln (‘Зачет’) else writeln (‘Незачет’);

Какое значение будет выведено на экран дисплея, если x=7.

  1. В программе использован оператор ветвления.


If x<1000 then writeln (‘да’) else writeln (‘нет’);

Какое значение будет выведено на экран дисплея, если Х=70.


  1. Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 7?


Program Primer1;

var a, b, p: integer;

Begin

writeln (‘Введите a’);

readln (a);

if (a>=7)

then begin

b:=3;

p:=a*a+b*b;

end

Else begin

b:=5;

p:=(a+b)*(a+b);

end;

writeln (‘ p=’, p);

End.

  1. В программе использован оператор ветвления.

If a>=b then

begin

c:=a;

a:=b;

b:=c;

end

else b:=1;

writeln (a,b);

Какое значение будет выведено на экран дисплея, если a=10, b=20?

Задачи:

1. Написать программу, определяющую по заданному числу месяца, время года. Например, если вводим 1, то на экране выводится - зима;

если вводим 5, то на экране выводится – весна и т.д.

2. Дана функция, определить ее результат, если

[pic]

3. Даны угля треугольника, определить:

- можно ли построить треугольник;

- тип треугольника ( остроугольный, прямоугольный, тупоугольный, равносторонний, равнобедренный, прямоугольный).