Question

Нарисуйте блок-схему пожалуйста к задаче: У младенца Кузьки вылезло уже s зубов, а у его бабы Дуси осталось w зубов. Задать с помощью генератора случайных чисел 2 целых числа от 0 до 5 (random (5)) - значения для s и w. У кого зубов больше?

Answer 1

Ответ:

Объяснение: Program Rinok;

Const x0=0;x1=5;

Var s,w: integer;

begin

Randomize;

s:=Random(X1-X0)+X0;

w:=Random(X1-X0)+X0;

writeln('у Кузи-',s);

writeln('у Дуси-',w);

if  (s>w)

then

Writeln ('-у Кузи больше')

else

Writeln ('-у Дуси больше');

Readln

end.