<em>// PascalABC.NET 3.2, сборка 1338 от 16.11.2016</em>
begin
var n:=ReadInteger('n=');
Writeln(1.To((n+10) div 2).JoinIntoString('')[n]);
end.
#include <iostream>
#include <cstdlib>
#include <math.h>
#include <time.h>
using namespace std;
int main()
{
system("chcp 1251 > null");
srand(time(0));
int n = 30;
int z = 0;
double sum = 0;
double sr = 0;
cout << "Температура: \n";
for(int i = 0; i<n; i++){
z = rand()%11+5;
cout << "\n" << z;
sum = sum + z;
}
sr = sum/n;
cout << "\n\nСредняя температура за сентябрь: " << sr;
}
Оценивать так же можно кнопочкой "Лучший ответ" :З
3
4
5
6
7
8
9
10
11
12
13
14
15
16
<span>using</span><span>System</span><span>;</span>
<span>class</span> Summa <span>{</span><span>static</span><span>void</span> Main<span>(</span><span>)</span><span>{</span><span>int</span> n <span>=</span> Convert<span>.</span><span>ToInt32</span><span>(</span>Console<span>.</span><span>ReadLine</span><span>(</span><span>)</span><span>)</span><span>;</span><span>int</span> i<span>;</span><span>int</span> sum <span>=</span><span>0</span><span>;</span><span>for</span><span>(</span>i<span>=</span><span>1</span><span>;</span> i <span><=</span>n<span>;</span> i<span>++</span><span>)</span><span>{</span>
sum <span>=</span> i<span>+</span>i<span>;</span><span>}</span>
Console<span>.</span><span>WriteLine</span><span>(</span>sum<span>)</span><span>;</span><span>}
</span>
{1 вариант}
var otr, vozr: byte;
begin
writeln('введите возраст');
readln(vozr);
case vozr do
6,7: otr:=5;
8,9: otr:=4;
10,11: otr:=3;
12,13: otr:=2;
14,15: otr:=1;
end;
writeln('Ваш отряд', otr);
end.
{2 вариант - более простой}
var otr, vozr: byte;
begin
writeln('введите возраст');
readln(vozr);
otr:=5 - vozr div 2 + 3;
writeln('ваш отряд', otr)
end.
Винчестер предназначен для долговременного хранения операционных систем, ежедневно использующихся программ и данных.