Сложные условия на Паскале

г. Балаково Саратовской области
Королёва Татьяна Владимировна

качестве исходных данных будет выведено значение a)0,b)5,c)10
Program a1;
Var x,y:integer;
Begin
Read(x);
If x

then y:=1 else y:=2;
If x>5 then y:=3 else y:=4;
Writeln(‘y=‘,y)
End.

x>5

x<5

X

y

y:=0 else y:=1;
Writeln(‘y=‘,y)
End.



x>5
x

координатами X,Y
X
Y
(X>0)and(Y>0)
(X0)
(X0)then writeln(‘1четверть’)else if (X0) then writeln(‘2четверть’) else if

(X<0)and(Y<0) then writeln(‘3четверть’) else writeln(‘4четверть’)

равно 0
If (a=0) or (b=0) then writeln(‘верно’) else writeln

(‘неверно’)

по ветке «Нет» должно быть выполнено несколько действий!!!
Для реализации таких

ситуаций на Паскале использую операторный скобки
begin оператор1;оператор2;……….end;

readln(a,b,c);
d:=sqr(b)-4*a*c;
If d

writeln(‘нет корней’)
else if d=0 then begin X:=(-1*b)/(2*a);
writeln(‘два равных корня’,x) end
else begin x1:=(-1*b+sqrt(d))/(2*a);
x2:=(-1*b-sqrt(d))/(2*a);
writeln(‘первый корень’,x1,’второй
корень’,x2) еnd end.

обычный)
Даны 3 числа a,b,c. Если а

квадратами, если a>b>c, то каждое число заменить нулём, в противном случае поменять знак всех чисел.(Двойные условия заменить двумя условиями с использованием соответствующих логических связок)
Работа светофора для пешеходов устроена следующим образом, каждые 2 минуты горит красный свет, затем каждые 3 минуты зелёный и т.д.Дано число К определяющее число минут, прошедшее с начала часа, определить какой сигнал горит в данный момент времени.