Var lc:real;
Begin
write('Кол-во лошадиных сил = ');
readln(lc);
write(lc * 0.735);
End.
ДЛЯ ДОЛГОВРЕМЕННОГО ХРАНЕНИЯ ОПЕРАЦИОННЫХ СИСТЕМ , ЕЖЕДНЕВНО ИСПОЛЬЗУЕМЫХ ПРОГРАММ И ДАННЫХ
От 50 файлов до 1гигабайта
Ответ:
a=open("input.txt").read().split()
a=list(map(int,a))
b=open("output.txt","w")
b.write(str(sum(a))+"\n")
b.write(str(sum(a)/len(a)))
b.close
Объяснение: