A:= sqrt(1 + sqr(B) - sqr(cos(x)));
B:= exp((1 / 5) * ln (Y<span>))</span> * (2 + sqr(sqr(x)) - 3.14 / 12) / (3 - x*x*x);
Как-то так...
Var a, b, x: integer;
Begin
write('Введите число a: ');
readln(a);
write('Введите число x: ');
readln(x);
write('Введите число b: ');
readln(b);
if (a×x+b<=0) then
writeln ('Сумма чиселел меньше или равна нулю')
else writeln('Сумма числел больше нуля');
End.
по типу данных
- числовые (целочисленные и с плавающей запятой)
- логические - истина / ложь
- символьные - один символ
- строковые - последовательность символов
по области видимости
- глобальные - видны из любого места программы
- локальные - видны только из процедуры в которой объявлены
по продолжительности действия
- автоматические - действуют внутри программного блока
- статические - сохраняют свое значение после выхода из блока
по времени создания
- статические - создаются в момент запуска программы
- динамические - создаются в процессе выполнения программы
по наличию внутренней структуры
- простые (число, строка)
- сложные (массив, запись)