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

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

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

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

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

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

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

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

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

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

4.      Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 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.

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

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. Дана функция, определить ее результат, если

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

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

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

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

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

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

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

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

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

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

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

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

4.      Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 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.

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

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. Дана функция, определить ее результат, если

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

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

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