Но даже если ничего съедобного в лесу не найдешь, то все равно встретишь много интересного. Можно обнаружить следы животного, можно услышать стук дятла или даже увидеть, как мелькает на стволе его красная головка. Можно собрать гербарий из листьев или цветов. Летом в лесу никогда не бывает скучно.Вы бывали летом в лесу? Прогулки по лесу - это так приятно, а наблюдательному человеку еще и интересно. Лес обязательно одарит такого человека своими дарами. Вон под елкой вырос гриб. Бархатная коричневая шляпка, плотная белая ножка. Это белый гриб, можно сказать, король всех грибов. Даже одного гриба достаточно, чтобы мама приготовила вкусный суп. А невдалеке от него еще один красавец. Красная глянцевая шапочка с белыми крапинками так и зовет, так и манит. Но лучше на его зов не поддаваться, это мухомор, он ядовитый. Идешь по лесу и почти все время слышишь, как кричит птица. Это сорока. Она видит приближение человека и начинает галдеть, предупреждает остальных зверей и птиц: " В лесу чужой". Гуляя по лесу, то и дело попадаешь в колючие заросли. Это ежевика, действительно колючее растение, оно больно царапает руки. Зато какие ягоды сладкие. Черные, блестящие, крупные. Лесная малина помельче. Зато по сладости не уступает. А если глянуть под ноги, то можно увидеть и трилистнички земляники, а над ними - маленькие яркие ягодки, такие вкусные и душистые.
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016) var a,n,i,s:integer; begin write('Число элементов последовательности '); readln(n); for i:=1 to n do begin write(i,' элемент последовательности = ');readln(a); if (a mod 2 <>0) then s:=s+a; end; writeln('Сумма нечетных = ',s); end.
Тестовое решение: Число элементов последовательности 5 1 элемент последовательности = 3 2 элемент последовательности = 2 3 элемент последовательности = 4 4 элемент последовательности = 1 5 элемент последовательности = 5 Сумма нечетных = 9
1. Если имеется в виду язык Pascal, то получим следующее: var: a; //PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016) begin readln(a); b:=a+a; writeln (b); end.
Program50.pas(5) : Неизвестное имя 'b'
2. Попробуем такой вариант на Python
a =int(input()) b = a+a print(b)
При вводе а получим на выходе 10
Получается, что в Pacal требуется объявлять переменные в секции переменных, или в любом месте программы можно объявить переменную с служебного слова var для PascalABC.net. Первый код можно переписать так, и он будет работать:
var: a; //PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016) begin readln(a); var b:=a+a; writeln (b); end.
Идешь по лесу и почти все время слышишь, как кричит птица. Это сорока. Она видит приближение человека и начинает галдеть, предупреждает остальных зверей и птиц: " В лесу чужой".
Гуляя по лесу, то и дело попадаешь в колючие заросли. Это ежевика, действительно колючее растение, оно больно царапает руки. Зато какие ягоды сладкие. Черные, блестящие, крупные. Лесная малина помельче. Зато по сладости не уступает. А если глянуть под ноги, то можно увидеть и трилистнички земляники, а над ними - маленькие яркие ягодки, такие вкусные и душистые.