Задать вопрос
8 июня, 03:47

В каком из условных операторов допущена синтаксическая ошибка?

1. if B = then Writeln ('Деление на ноль невозможно') ;

2. if a > b then max: = a else max: = b;

3. if (a > b) and (b > 0) then c:=a+b;

4. if a < b then min: = a; else min: = b;

+5
Ответы (1)
  1. 8 июня, 05:13
    0
    В четвертом перед else не должно быть точки с запятой

    В первом тоже непонятно что за В = then
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «В каком из условных операторов допущена синтаксическая ошибка? 1. if B = then Writeln ('Деление на ноль невозможно') ; 2. if a > b then ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Где ошибка? Sub сер Dim x, y, z, f, max, min As Single x = Val (InputBox (2)) y = (InputBox (6)) z = (InputBox (10)) If x / 2 > y / 3 > z / 4 Then If x / 2 > y / 3 Then max = x / 2 Else max = y / 3 End If End If Else If y / 3 > z / 4 Then max =
Ответы (1)
Program naim4; var a, b, c, d, min:real; begin; writeln ('введите 4 числа') ; readln; min:=a; if b < min then min:=b; if c < min then min:=c; if d < min then min:=d; writeln ('минимальное ', min) ; readln; end.
Ответы (2)
Имеется условный оператор:if D10 then writeln ('ура!') else writeln ('плохо ...') ; Какими операторами его можно заменить? Выберите несколько из 4 вариантов ответа: 1) if D=10 then writeln ('ура!') else writeln ('плохо ...
Ответы (1)
Program a2; var n, i, min, max, x:integer; begin Writeln ('Введите колицество человек в классе:') ; Readln (n) ; Writeln ('Введите рост 1 ученика:') ; readln (x) ; min:=x; max:=x; for i:=2 to n do begin Writeln ('Введите рост ', i,' ученика:') ;
Ответы (1)
Выдает ошибку Операция > не может быть применена к типам boolean и integer Program qq; var a, b, c, max, min, med : integer; begin writeln ('введите три числа') ; read (a, b, c) ; if c>b>a then begin max : = c; med : = b; min : = a; End;
Ответы (1)