То средние значение от B3 до B8 поделим на 2
240\6=40 это ответ выполненный после твоей формулы
Лукас мне:3
<span><span><span><span>
а)
A B C A-->B --B+C результат
0 0 0 1 1 1
0 0 1 1 1 1
0 1 0 1 0 0
0 1 1 1 1 1
1 0 0 0 1 0
1 0 1 0 1 0
1 1 0 1 0 0
1 1 1 1 1 1и далее в том же духе...</span></span><span /></span></span><span><span /></span>
Program gt2;
var i,j,s:integer;
a:array[1..4,1..4]of integer;
begin
randomize;
for i:=1 to 4 do
for j:=1 to 4 do
a[i,j]:=random(7)+12;
for i:=1 to 4 do
begin
s:=0;
for j:=1 to 4 do
s:=s+a[j,i];
writeln(s);
end;
<span>end.
program gt3;
var i,j,s:integer;
a:array[1..7,1..7]of integer;
begin
randomize;
for i:=1 to 7 do
for j:=1 to 7 do
a[i,j]:=random(7)+12;
for i:=1 to 7 do
begin
s:=0;
for j:=1 to 7 do
if(a[j,i]<14)then s:=s+1;
writeln(s);
end;
<span>end.
program gt4;
var i,j,p:integer;
a:array[1..3,1..3]of integer;
begin
for i:=1 to 3 do
for j:=1 to 3 do
read(a[i,j]);
for i:=1 to 3 do
begin
p:=a[i,1];
a[i,1]:=a[i,2];
a[i,2]:=p;
end;
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
write(a[i,j],' ');
end;
writeln;
end;
<span>end.
</span></span></span>
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
Console.WriteLine("Введите строку: ");
string str = Console.ReadLine();// строка
Console.WriteLine("Введите подстроку: ");
string podstr = Console.ReadLine();//подстрока
var temp = str.Split().Where(i => i.Contains(podstr));
Console.WriteLine("Слова содержащие подстроку:");
foreach (var word in temp)
Console.Write(word + " ");
Console.ReadLine();
}
}
}