Предмет: Информатика,
автор: coshmar
срочно
Секретный замок для сейфа состоит из 10 расположенных в ряд ячеек, в которые надо вставить игральные кубики. Но дверь открывается только в том случае, когда в любых трех соседних ячейках сумма точек на передних гранях кубиков равна 10. (Игральный кубик имеет на каждой грани от 1 до 6 точек.) Напишите программу, которая разгадывает код замка при условии, что два кубика уже вставлены в ячейки
Ответы
Автор ответа:
0
var
a: array [1..10] of integer;
i: integer;
begin
readln(a[1], a[2]);
write('Код замка: ', a[1], ' ', a[2], ' ');
for i := 3 to 10 do
begin
a[i] := 10 - (a[i - 1] + a[i - 2]);
write(a[i], ' ');
end;
end.
a: array [1..10] of integer;
i: integer;
begin
readln(a[1], a[2]);
write('Код замка: ', a[1], ' ', a[2], ' ');
for i := 3 to 10 do
begin
a[i] := 10 - (a[i - 1] + a[i - 2]);
write(a[i], ' ');
end;
end.
Автор ответа:
0
var
n1, n2, n3: integer;
begin
write('Введите очки на двух первых кубиках: ');
readln(n1, n2);
n3 := 10 - (n1 + n2);
writeln('Замок имеет код ', n1, n2, n3, n1, n2, n3, n1, n2, n3, n1);
end.
Тестовое решение:
Введите очки на двух первых кубиках: 3 5
Замок имеет код 3523523523
n1, n2, n3: integer;
begin
write('Введите очки на двух первых кубиках: ');
readln(n1, n2);
n3 := 10 - (n1 + n2);
writeln('Замок имеет код ', n1, n2, n3, n1, n2, n3, n1, n2, n3, n1);
end.
Тестовое решение:
Введите очки на двух первых кубиках: 3 5
Замок имеет код 3523523523
Похожие вопросы
Предмет: Другие предметы,
автор: sergejarsonov6
Предмет: Биология,
автор: viktoriapyhur1610
Предмет: Математика,
автор: radautyapova34
Предмет: Математика,
автор: епов
Предмет: Алгебра,
автор: anni456