Var
a:array[1..5] of integer;
i:integer;
begin
for i:=1 to 5 do readln(a[i]);
for i:=1 to 5 do if a[i] < 0 then write(a[i],' ');
writeln('- отрицательные');
readln;
<span>end.
Так?</span>
Если Света и Настя идут в лес, то и Маша идет в лес.
Иначе - если они идут на рыбалку - то и Маша тоже.
Если они идут на рыбалку, то Гриша тоже.
Иначе - если они идут в лес - то и Гриша идет в лес.
А Алексей вместе с Гришей.
Получается, что Маша, Гриша и Алексей идут туда,
куда идут Света и Настя.
Света, похоже, везде ходит вместе с Настей.
А Настя идет вслед за Мишей.
Получается, что они все идут вслед за Мишей.
Верное утверждение 2:
Если Света идет в лес, то все берут корзины и ножики и тоже идут в лес за грибами.
Система счисления шестеричная. Было 16 мальчиков и 20 девочек. Решение во вложении
Int h = 100000,count=1;
while(h!=0)
{
h/=10;
count++;
}
if(count / 2 == 0)
//число четное
наверное как то так