38.89 получается 38.9,а 37.56 получается 37.6 их сумма 76.5
Что именно нужно сделать?
<em>// PascalABC.NET 3.3, сборка 1600 от 23.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var b:=ReadArrReal(8);
Writeln('Введен массив'); b.Println
end.
<u>Пример</u>
-3.2 0 12 -7 0.003 12.43 3.141593 11
Введен массив
-3.2 0 12 -7 0.003 12.43 3.141593 11
СОЧ-1 задание составить из 5 слов продложение-шужык,газыр и тд,2 задание:вставитьбуквы-с_ка,м-т и тд.....всё....
<span>Литерная величина - Величина, которая
воспринимается как текстовая константа. Можно определить литерную
величину как литерал без чисел. Другие названия: символьная, строковая
величины, цепочка. В большинстве языков программирования литерная
величина заключается в апострофы - '123', 'abcd'.
Функция длин(S) Возвращает количество символов в строке S.
Операция
вырезка позволяет "вырезать" из строки группу соседних символов.
Вырезка из строки S подстроки, начинающейся с i-ой и кончающейся j-ой
позицией, обозначается S [ i : j]. Вырезка из строки S одного i-го
символа обозначается S[i].
Команда присваивания вырезке S[N : M]
:= SubS. Часть строки S, начиная с позиции N и кончая позицией M,
заменяется на подстроку SubS такой же длины.
Delete ( Var S : String; N, M : Integer ) Удаляет M символов из строки
S, начиная с позиции N.
Insert ( SubS : String; Var S : String; N : Integer ) Вставляет подстроку SubS в строку S, начиная с позиции N.
Str ( X : Integer; Var S : String ) Возвращает представление числа X в его символьной форме S.
Val
( S : String; Var X, Code : Integer ) Возвращает представление символов
строки S в ее числовой форме X. Параметр Code содержит признак ошибки
преобразования (если Code = 0, ошибки нет).
Функции
Chr ( X : Byte ) : Char Возвращает символ с заданным порядковым номером X.
Сoncat ( S1 [ , S2 , ... , SN ] ): String Выполняет сцепку (конкатенацию) последовательности строк.
Copy ( S : String; N , M : Integer ) : String Возвращает подстроку из строки S, начиная с позиции N и длиной M символов.
Length ( S : String ) : Byte Возвращает количество символов в строке S.
Ord ( X : Char ) : LongInt Возвращает порядковый номер символа X в таблице кодов символов.
Pos
( SubS , S : String ) : Byte Возвращает номер позиции, начиная с
которой в строке S располагается подстрока SubS (если значение функции
равно нулю, то S не содержит SubS).
ASC ( X$ ) Возвращает порядковый номер символа X$ в таблице кодов
символов.
CHR$ ( N ) Возвращает символ с заданным порядковым номером N.
INSTR
( [ N , ] X$ , Y$ ) Возвращает номер позиции строки X$, начиная с
которой в ней размещается подстрока Y$. Если подстрока не найдена, то
значение функции равно нулю. Поиск подстроки ведется с позиции N, а если
N не задано, то с начала строки.
LEFT$ ( X$ , N ) Возвращает подстроку, составленную из первых N символов строки X$.
LEN ( X$ ) Возвращает количество символов в строке X$.
MID$
( X$, N [ , M ] ) Возвращает подстроку, составленную из M символов
строки X$, начиная с позиции N (если параметр М опущен, то возвращаются
все символы, начиная с позиции N).
RIGHT$ ( X$ , N ) Возвращает подстроку, составленную из последних N символов строки X$.
STR$ ( N ) Возвращает представление числа N в символьной форме.
VAL ( X$ ) Возвращает представление символов строки X$ в числовой форме.
Операторы
MID$
( X$ , N , M ) = Y$ Часть строки X$, начиная с позиции N, длиной M
позиций заменяется на строку Y$. Длина X$ не изменяется.
SWAP X$ , Y$ Строки X$ и Y$ обмениваются своими значениями.
</span>