Var
text : string;
i : integer;
begin
write('Введите текст: ');
readln(text);
write('Результат: ');
for i := length(text) downto 1 do
write(text[i]);
<span>end. </span>
берем 1 число с начала и одно с конца:
1+10=11
2+9=11
и т.д
Всегда получается 11.НАйдем количество таких пар и полученное число умножим на 11.
10:2 =5- 5 пар получится
5*11=55 сумма целых чисел от 1 до 10
В данном случае носителем информации является берестяная грамота.
<span>function f1(t1){
if((t1/2)==parseInt(t1/2)) return "Число чётное"; else return "Число нечётное";
}
var a=prompt("Введите число");
alert(f1(a));<span>
</span></span>