• Вопрос по информатике:

    program one;
    uses crt;
    var x,z: integer;
    begin
    writeln('введи число');
    readln(x);
    if x div 5=0 then z:=x-5 else if z:=x/5;
    writeln ('z=',x);
    end.

    (выдаёт ошибку на 7 строчке(встретился := , а ожидался оператор))

    • Автор:

      talon
  • спасибо, но после запуска вводишь число и оно только умножается на 2, даже если делится на 5 без остатка
    • Отвечал:

      jonásez1k

    Ответ:

    Простая ошибка

    Объяснение:

    program one;

    uses crt;

    var

    x,z:integer;

    begin

    writeln('введи число');

    readln(x);

    if x div 5=0 then z:=x-5

    else

    z:=x/5;

    writeln('z=',x);

    end.

    • Отвечал:

      salmalynn

    Ответов нет, но ты это испарвиш!