Program z1;
var s:string;
var i,n,f:integer;
var ch:char;
begin
writeln('Введите строку');
readln(s);
f:=0;
n:=length(s);
ch:=s[n];
for i:=1 to n do
if(s[i]=ch) then
f:=f+1;
if(f<>0) then
writeln('yes')
else writeln('no');
end.
Мое предложение - в массиве 20 на 20 храниться структура struct cell { int rabbit; // кол-во зайцев int* wolfs; // очки волков int* she_wolfs;// очки волчиц } очки предлагаю хранить умноженными на 10 во избежания проблем вещественным сравнением. Но есть одна проблема с задачей в целом. Это порядок ходов. Если в двух соседних клетках находятся заяц и волк, и первый ходит заяц, то волк может остаться голодным. Если же первый ходит волк - он то зайца может скушать. Поэтому, я предлагаю, что вначале ходят все зайцы, потом все волки - по очереди.
1000байт-1Кбайт-10Мбайт-1Гбайт
A)Antivirus Kaspersky
B)В случае скачивание из интернета игру но это не игра а вирус, тем самым вирус остаётся в компьютере.
C)Возможности Анти-Вирусов много например: Анти-Вирус может обнаружить вирус который был загружен на ваш пк и обезвредить угрозу, блокировать браузерные рекламы (спам) и.т.д