<em>// PascalABC.NET 3.3, сборка 1542 от 05.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Range(-10,10).Foreach(i->Println(i,Abs(i)))
end.
<u>Результат</u>
-10 10
-9 9
-8 8
-7 7
-6 6
-5 5
-4 4
-3 3
-2 2
-1 1
0 0
1 1
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
10 10
Переменную рекомендуется делать мнемоническим.
В переменной допустимы только латинские буквы, цифры и нижний пробел,но переменная не может начинаться с цифры.
С дано задачи? Я тут даже не знаю что надо в дано писать.
Разве что так:
Дано:
Символ = 16 бит
Найти:
Размер предложения
(Бред написал какой-то, но такой тип задач не решается через дано)
Решение:
Ну в общем, нужно посчитать каждый символ в этом предложении (точки и пробелы тоже считаются)
СЛУХ_ОБО_МНЕ_ПРОЙДЕТ_ПО_ВСЕЙ_РУСИ.
34 символа.
Так-как, 1 символ = 16 бит, то 34 х 16 = 544 бит
544 бит = 68 байт
Program n1;
var a,b,i: integer;
sum,k: real;
begin
sum:=0;
k:=0;
readln(a,b);
for i:=a to b do
begin
sum:=sum+i*i;
k:=k+1;
end;
writeln(sum/k:6:2);
end.
N = int(input())
a = n - 1
g = n *a
h = g / 2
print(g)
ответ в языке python