Ответы
Ответ дал:
0
var
n, a, i: integer;
ar: array[0..6]of char =('7', '1', '2', '3', '4', '5', '6');
begin
read(n);
a := n mod 7;
write(ar[a]);
end.
n, a, i: integer;
ar: array[0..6]of char =('7', '1', '2', '3', '4', '5', '6');
begin
read(n);
a := n mod 7;
write(ar[a]);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад
10 лет назад
10 лет назад