Помогите,пожалуйста, написать программку,в которой пользователь подразумевается дополнить до

Помогите,пожалуйста, написать программку,в которой пользователь подразумевается дополнить до 100 некое целое число a(а-случайное число,меньше 100). Ответ юзера проверяется и комментируется. Обязан быть random)Спасибо!

Задать свой вопрос
Vadim
Ну помогите
1 ответ
Uses crt;
var a,b:integer;
begin
randomize;
a:=random(100);
writeln(a);
repeat
readln(b);
if b=100  then writeln('дополнено');
if blt;100 then writeln('прибавь еще');
if bgt;100 then writeln('убавь-ка');
until b=100;
end.


Амелия Златокрылец
У меня ошибка выходит
Тамара Реготун
что конкретно пишет
Виктор Рамазан
пишет "ожидалось имя процедуры либо функции" после а:=random
Дарина
удивительно, у меня оплошности нет. какой паскаль стоит? у меня ABC
Anton Kashtankin
И у меня
Danil Vetchanin
Все верно написал
Леонид Трахин
Если правдиво, не знаю, в чем дело, у меня все прекрасно работает...
Грозинский Артем
А что такое юзис и юнтил?
Николай Спицаренко
юзис вызывает окошко ввода, то есть не внизу данные вводятся, а во всплывающем окошке. Юнтил - это постусловие, при исполнении которого цикл repeat прекращается
Анжелика Крипак
СПС)
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт