program one;uses crt;var x,z: integer;beginwriteln(039;введи число039;);readln(x);if x div

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 строке(повстречался := , а ожидался оператор))

Задать свой вопрос
Кира Полюга
пожалуйста!!! очень безотлагательно!!!
1 ответ

Ответ:

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

Объяснение:

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.

Алиса Шлемова
спасибо, но после запуска вводишь число и оно только множится на 2, даже если делится на 5 без остатка
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт