Program antonim;
var s1,s2:string;
begin
s1:='горячий';{Наше слово}
write ('Введите антоним (с маленькой буквы) к слову ',s1,': ');
readln (s2);{Ввод антонима}
if (s2<>'холодный') or (s2<>'прохладный') then writeln ('Таких слов нету.'); {Проверка условия}
end.
#include <cstdlib>#include <iostream>#include <iomanip>#include <cmath>
using namespace std;
int main(){ setlocale(0, ""); double x, y, a, b, xk, xn, dx; a = 1.4; b = 2.5; cout << "Ââåäèòå xn,xk, dx = " << endl; cin >> xn; cin >> xk; cin >> dx; x = xn; cout << "Tabl" << endl; cout << "+-----------+" << endl; cout << "¦ x ¦ y ¦" << endl; while (x <= xk) { y = (log10(a*x*x+b))/(a*x+1); cout << "+-----+-----¦" << endl; cout.setf(ios::fixed); cout.precision(3); cout << "¦" << x << "¦"<< y << "¦" << endl; x = x + dx; } cout << "+-----------+"; system("pause");}
<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>
