Два игрока, петя и ваня, играют в следующую игру. перед игроками лежит куча камней. игроки ходят по - id253662720200915 от uroolga 15.09.2020 09:25

Question

Информатика: Два игрока, петя и ваня, играют в следующую игру. перед игроками лежит куча камней. игроки ходят по очереди, первый ход делает петя. за один ход игрок может добавить в кучу один камень,добавить в кучу три камня или увеличить количество камней в куче в три раза. например, имея кучу из 15 камней, за один ход можно получить кучу из 16,18 или 45 камней. у каждого игрока, чтобы делать ходы, есть неограниченное количество камней. игра завершается в тот момент, когда количество камней в куче становится

uroolga · Accepted Answer

S:string;
a, i, k, b, n:integer;
begin
readln(s);
readln(a);
k:=1;
for i:=1 to length(s) do begin
k:=k*val(s[i], n);
if val(s[i], n)=a then b:=b+1;end;
writeln(k);
if b=0 then writeln('yes')
else writeln('no');
readln;
end.
2
a:array[1..1000] of integer;
begin
k:=1;
for i:=100 to 999
if (((i+1) mod 2))=0) and (((i+2) mod 3)=0) and (((i+3) mod 4)=0) and (((i+4) mod 5)=0) then begin a[k]:=i; k:=k+1; end;
for i:=1 to k do
writeln(a[i]);
readln;
end.

3
s, a:string;
i, k:integer;
begin
readln(s);
readln(a);
for i:=1 to length(s) do
if s[i]=a then s[i]:='';
writeln(s);
readln;
end.

MOGZ ответил