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

Тест по теме: «Оператор ветвления»
Укажите значение величины S после выполнения следующих команд:
S:=7; S:=23; S:=S+6;
В программе использован оператор ветвления.

If x>=3 then writeln (Зачет’) else writeln (Незачет’);
Какое значение будет выведено на экран дисплея, если x=7.
В программе использован оператор ветвления.

If x<1000 then writeln (да’) else writeln (нет’);
Какое значение будет выведено на экран дисплея, если Х=70.

Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 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.
В программе использован оператор ветвления.
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. Дана функция, определить ее результат, если
13 EMBED Equation.3 1415
3. Даны угля треугольника, определить:
- можно ли построить треугольник;
- тип треугольника ( остроугольный, прямоугольный, тупоугольный, равносторонний, равнобедренный, прямоугольный).

Тест по теме: «Оператор ветвления»
Укажите значение величины S после выполнения следующих команд:
·
S:=7; S:=23; S:=S+6;
В программе использован оператор ветвления.

If x>=3 then writeln (Зачет’) else writeln (Незачет’);
Какое значение будет выведено на экран дисплея, если x=7.
В программе использован оператор ветвления.

If x<1000 then writeln (да’) else writeln (нет’);
Какое значение будет выведено на экран дисплея, если Х=70.

Какое значение будет иметь переменная р после выполнения программы, если с клавиатуры введено число 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.
В программе использован оператор ветвления.
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. Дана функция, определить ее результат, если
13 EMBED Equation.3 1415
3. Даны угля треугольника, определить:
- можно ли построить треугольник;
- тип треугольника ( остроугольный, прямоугольный, тупоугольный, равносторонний, равнобедренный, прямоугольный).