Составить алгоритм перевода саженей в метры для значений длин от 1 до 20 саженей.
нужен алгоритм или программа? на паскале?
Progam One; var a,b:real; begin write('Введите длину в саженях'); readln(a); writeln(b:=a*2,1336); readln; end.
этот вопрос уже был сегодня и я ответил. В данной программе должно быть b:=a/2,1336