Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
если переменная нужна целая то так:
x: =random(b-a)+a
если можно дробную, то так
x: =(b-a)*random+a
program summa;
var s, a, b, c : word;
begin
write('введите a - > '); readln(a);
write('введите b - > '); readln(b);
write('введите с - > '); readln(c);
s: =a+b+c;
write(' сумма равна ',s);
readln
end.
Популярные вопросы