Паскаль ругается, а я не знаю в чем проблема... Помогите найти ошибку.
program pr1;
var a, b, d: integer;
readln(a);
readln(b);
d:=1;
while (d<>a) or (b mod 4=0) do begin
d:=d+1
readln(b);
end
writeln(d);
end.
На этот вопрос еще никто не ответил. Напишите свой ответ или воспользуйтесь поиском:
Новые вопросы
Математика,
2 года назад
Математика,
2 года назад
История,
8 лет назад
Физика,
9 лет назад
Математика,
9 лет назад