Ответ:
=ЕСЛИ(И(-5<ЯЧЕЙКА1<5;-5<ЯЧЕЙКА2<5);"да";"нет")
Объяснение:
пишешь вместо ЯЧЕЙКА1 и ЯЧЕЙКА2 индексы нужных ячеек с координатами. вставлять функцию там, где в самом задании написано "да" и "нет".
Учебник-5 запятых справа; кит-одна запятая слева; ель
Var
a:array[1..10]of integer;
i:integer;
Begin
For i:= 1 to 10 do
begin
Read(a[i]);
if a[i] mod 2 <>0 then Write(a[i], ' ');
end;
end.
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
//Более современное решение
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
Begin
var a:= ReadlnString('Введите массив').ToIntegers;
SetLength(a, 10);
a.Where(t->t.isOdd).Println;
end.
Program pizma;
var a,b,c,v,sp,sb:real;
begin
read(a);
read(b);
read(c);
v:=a*b*c;
sb:=4*с*(a+b);
sp:=2*(a*b+b*c+a*c);
write('объем=',v,' площадьSb='sb,' и SP=',sp);
end.
1) Появление компьютерных сетей связано с тем, что военные части в случае военных действий во время холодной войны должны были бы обмениваться информацией по надежному каналу связи. Такой канал связи стали разрабатывать в 50-е годы в США.
Вторая причина тоже связана с обменом информацией только между институтами - появилась необходимость в быстром обмене при проведении исследований на разных научных базах в разных институтах
2) ограниченные возможности запоминающих устройств, т.е. для хранения больших объемов информации
3) для увеличения скорости обрабатываемых данных (в случае большого количества информации)