Using System;
class Program
{
static void Main(string[] args)
{
int N = int.Parse(Console.ReadLine());
double sum = 0;
for (int i = 1; i <= N; i++)
sum += 1.0 / i;
Console.WriteLine(sum);
}
<span>}</span>
===== PascalABC.NET =====
begin
var (s, n) := ReadInteger2('Введите S и N:');
var r := 0;
for var m10 := 0 to S div 10 do
begin
for var m5 := 0 to (S - 10 * m10) div 5 do
begin
if m10 + m5 > N then
break;
for var m2 := 0 to (S - 10 * m10 - 5 * m5) div 2 do
begin
if m10 + m5 + m2 > N then
break;
for var m1 := 0 to S - 10 * m10 - 5 * m5 - 2 * m2 do
begin
if m10 + m5 + m2 + m1 > N then
break;
if (m10 * 10 + m5 * 5 + m2 *2 + m1 = s) and
(m10 + m5 + m2+ m1 = N) then
begin
$'{m10} x 10 + {m5} x 5 + {m2} x 2 + {m1} x 1'.Println;
Inc(r)
end
end
end
end
end;
if r > 0 then
Println('Найдено вариантов размена:', r)
else
Println('Вариантов такого размена нет')
end.
за 3 шага: 8/2 (в какой части: или 1-4 или 5-8), если 1-4, то 4/2 (в какой части: или 1,2 или 3,4) коля спросил: 1,2? петя сказал: да. и тут коля угадал: петя загадал числло 2.<em> Ну типо того, не знаю, понятно или нет........</em>
Мова - Python
a = int(input("a="))
b = int(input("b="))
c = int(input("c="))
if (a + b) > c and (b + c) > a and (a + c) > b:
if a == c and a == b and b == c:
print("Трикутник рівносторонній")
elif a == c or a == b or b == c:
print("Трикутник рівнобедрений")
else:
print("Трикутник-довільний")
else:
print("Нерівність трикутника не виконується")
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
int main()
{
int i,j,n,sum,a[30][30];
printf("n=");
srand(time(NULL));
scanf("%d",&n);
printf("Matrix:\n");
sum = 0;
for (i = 1; i <= n; i++)
{
for (j = 1; j<=n; j++)
{
a[i][j]=1+rand()%9;
printf("%d ",a[i][j]);
}
printf("\n");
}
printf("\n");
for (i=2;i<=n-1;i++)
{
for(j=1;j<=2*i-1;j++)
if(i!=j)
sum+=a[i*2-j][j];
a[i][i]=sum;
sum=0;
}
printf("Output matrix:\n");
for (i = 1; i <= n; i++)
{
for (j = 1; j <= n; j++)
printf("%d ", a[i][j]);
printf("\n");
}
return 0;
}