Содержание

Главная >> Информатика 8 класс. Босова

§ 3.4. Программирование разветвляющихся алгоритмов

3.4.2. Составной оператор

В условном операторе и после then, и после else можно использовать только один оператор. Если при некотором условии требуется выполнить определённую последовательность операторов, то их объединяют в один составной оператор.

Конструкция вида

begin <последовательность операторов> end

называется составным оператором.

Пример. Алгоритм решения квадратного уравнения вам хорошо известен. Запишем соответствующую программу на языке Паскаль.

program n_11;
    var a, b, с: real;
    var d: real;
    var x, x1, x2: real;
begin
    writeln ('Решение квадратного уравнения');
    write ('Введите коэффициенты а, b, с»'); readln (а, b, с) ;
    d:=b*b-4*a*c;
    if d<0 then writeln ('Корней нет');
    if d=0 then
          begin
            x:=-b/2/a;
            writeln ('Корень уравнения x=', x:9:3)
         
        end;
    if d>0 then
        begin
          x1:=(-b+sqrt(d))/2/a;
          x2:=(-b-sqrt(d))/2/a;
          writeln ('Корни уравнения:');
          writeln ('x1=', x1:9:3);
          writeln ('x2=', x2:9:3)
        end
end.