Программа моделирует при помощи датчика случайных чисел бросание двух игральных костей до выпадения двух 6. выведите на экран число бросаний. АВС паскаль

Question

Информатика

Анатольич

19 июня, 21:02

Программа моделирует при помощи датчика случайных чисел бросание двух игральных костей до выпадения двух 6. выведите на экран число бросаний. АВС паскаль

+1

Ответы (1)

Знаете ответ?

Василей · Answer 1

Var a, b, k:integer;

begin;

randomize;

while ((a6) or (b6)) do

begin;

a:=random (1,6) ;

b:=random (1,6) ;

inc (k) ;

writeln (A,' и ', B,', бросок №', k) ;

end;

writeln ('Всего было сделано ', k,' бросков') ;

end.