Напишите программу, которая будет генерировать 2 случайных числа от 1 до 6, до тех пор, пока сумма этих двух чисел не будет равна как минимум 10.
Для этого понадобится цикл while.
Для этого понадобится цикл while.
More Questions From This User See All
Answers & Comments
Ответ:
1 1
2 3
6 2
5 3
4 5
Объяснение:
###
var a,b:integer;
while a + b < 10 do
begin
a := Random(1,6);
b := Random(1,6);
if a+b >= 10 then break
else
println(a,b);
end;