количество возможных вариантов N в степени 10
<h3>PascalABC.NET 3.4.2, сборка 1863 от 10.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
uses NumLibABC;
begin
var A := new Matrix(3, 3, -4, 1, 2, 5, 0, 7, 6, 2, 4);
var B := new Matrix(3, 4, 5, -1, 3, 4, 2, 0, 1, 6, 4, -3, 2, 3);
var C := A * B;
C.Println(5, 0)
end.
1248849018880. Лррлопопопооплппо
Везде значения вводятся с клавиатуры!
на java
если изучали массив:
public class qwert {<span>
public static void main(String args[])</span><span> {</span><span>
Scanner scn = new Scanner(System.in);</span><span>
int[] a = new int[5];</span><span>
int k = 0;</span><span>
for (int i = 0; i < 5; i++)</span><span> {
</span><span> a[i] = scn.nextInt();</span><span>
k = k + a[i];
</span><span> if (i == 4)</span><span>
System.out.println(k/i);</span><span>
}</span><span>
}</span><span>}
если не изучали массив:
public class qwert {<span>
public static void main(String args[])</span><span> {</span><span>
Scanner scn = new Scanner(System.in);</span><span>
int a = scn.nextInt();
</span><span> int b = scn.nextInt();</span><span>
int c = scn.nextInt();
</span><span> int d = scn.nextInt();</span><span>
int e = scn.nextInt();
</span><span> int s = (a + b + c + d + e) / 5;</span><span>
System.out.println(s);
</span><span> }</span><span>}
на паскале через массив:
var a:array [1..5] of integer;
i:integer;
s:real;
begin
for i := 1 to 5 do
begin
readln(a[i]);
s := s + a[i];
if i = 5
then
write (s/i);
end;
<span>end.
не через масивы:
var a,b,c,d,e :integer;
s:real;
begin
readln(a,b,c,d,e);
s := (a+b+c+d+e)/5;
write(s);
<span>end.</span></span></span></span>
Program lol;
var i:integer;
sum,kv:real;
begin
for i := a to b do
begin
kv = i*i;
sum:=sum+kv;
kv:=0;
end;
end.