Здравствуйте...помогите мне пожалуйста! Паскаль ,надо составить программу ...Даны 5 чисел (2 целых,3 веществ.) Выбираются случайно(random) Рассчитать сумму целых чисел и результат в первую переменную. Вычислить разность вещ. чисел и результат в переменную вещ. числа...
Answers & Comments
x,y:integer;
begin
randomize();
x:=random(-128,127);
y:=random(-128,127);
x:=x+y;
writeln(x);
r:=random()*random(-128,127);
p:=random()*random(-128,127);
q:=random()*random(-128,127);
r:=r-p-q;
writeln(r);
end.