Напишите программу, в которой пользователю предлагается дополнить до 100 некоторое число a (а - случайное число, меньше 100). Ответ пользователя проверяется и комментируется. ----------------------- Желательно с объяснением

Question

Напишите программу, в которой пользователю предлагается дополнить до 100 некоторое число a (а - случайное число, меньше 100). Ответ пользователя проверяется и комментируется. ----------------------- Желательно с объяснением

Гость

Ответ(ы) на вопрос:

Accepted Answer

Program sto;Vara,b:integer;BeginReadln(a);b:= 100 - a; //Вычисляем остаток которы нужно прибавить к числу, и записываем его в переменную b;Writeln('Если к вашему числу прибавить: ',b,', то в результате будет 100'); //Выводим ответ пользователю;End.