A = int(input())
if 2 <= a <= 5:
a += 10
elif 7 <= a <= 40:
a -= 100
elif a <= 0 or a > 3000:
a *= 3
else:
a = 0
print(a)
1 способ:
если x<=-1
то ...
иначе если x<0 то ...
иначе ...
2 способ:
если x<=-1 то ...
если (x>-1) И (x<0) то ...
если x>=0 то ...
//Pascal ABC.NET 3.1 сборка 1256
Var
ars:array[1..12] of string:=('января','февраля','марта','апреля','мая','июня','июля','августа','сентября','октября','ноября','декабря');
s:string;
begin
read(s);
if s[1]='0' then delete(s,1,1);
write(copy(s,1,pos('.',s)-1),' ');
delete(s,1,pos('.',s));
write(ars[strtoint(copy(s,1,pos('.',s)-1))],' ');
delete(s,1,pos('.',s));
write(s,' года');
end.
Пример ввода:
15.10.2012
Пример вывода:
<span>15 октября 2012 года</span>
Программные продукты можно классифицировать по различным признакам.
Основным признаком, по которому классифицируют все программные продукты,
является сфера (область) их использования. Поэтому различают следующие
классы программных продуктов: