1.Основание
2.Естественная
3.Разновидностей
4.Искусственная
обьективность – 6
достоверность – 5
актуальность – 3
полезность – 2
понятность –1
полнота – 4
где цифры – номера утверждений сверху вниз в втором стоблце
<SCRIPT>
var a = prompt('1. a = ','');
alert ('V = '+a*a*a+' S = '+6*a*a);
z = -1; s=0;
for (i=1; i<=10; i++){z=-z; s=s+z*i};
alert ('s=1-2+3+...+(-1)^9*10 = '+s);
var s = prompt('3. s = ','');
k=0;
for (i=0; i<s.length;i++)
if (s[i]=='к') k++
alert ('k = '+k);
</SCRIPT>
Пример показан в прилагаемом файле.
Print('-'*int(input()))
А если с процедурой непременно хочется, то будет просто длиннее:
def Line():
print('-'*int(input()))
Line()
Program n1;
var a: real;
begin
readln(a);
if a>0 then write('число больше ноля') else if a<0 then write('число меньше ноля') else write('вы ввели ноль');
end.