Официально этот символ теперь называется arobase ("эробаз") и arrobe ("эрроб").
Второе название употребляется немного чаще.
Первоначальное название данного символа at ("эт") сейчас тоже употребляется,
но оно считается устаревшим и не рекомендуется к использованию.
В разных странах этот символ имеет разные названия.
<span>Например, в Норвегии этот символ именуют "селедкой", а в Дании чаще употребляют название "чайка". вот</span>
Алгоритм 21211
вычти 1: 27-1=26
раздели на 2: 26/2=13
вычти 1: 13-1=12
раздели на 2: 12/2=6
раздели на 2: 6/2=3
Ответ: 21211
Перевести число 100110 из двоичной в десятичную
Var
x, a, t, y: real;
begin
Write('Введите значение аргумента x: ');
Readln(x);
Write('Введите значение коэффициента a: ');
Readln(a);
{боремся с неположительным значением под знаком корня}
t := a - cos(x);
if t < 0 then y := exp(x + 1.8) - exp(1 / 5 * ln(-t))
else if t = 0 then y := exp(x + 1.8)
else y := exp(x + 1.8) + exp(1 / 5 * ln(t));
Writeln('Значение функции равно ', y)
end.
Тестовое решение:
Введите значение аргумента x: -4.2
Введите значение коэффициента a: 1.95
Значение функции равно 1.28604638457326
Program gt;
var a:string;
k,l,i:integer;
begin
readln(a);
//Сначала переведем вес текст в нижний регистр
l:=length(a);
k:=0;
for i:=1 to l do
begin
if(ord(a[i])>64)and(ord(a[i])<91)then a[i]:=chr(ord(a[i])+32);
if(a[i]='а')or(a[i]='у')or ... or(a[i]='е')then k:=k+1; //здесь вместо точек пиши как ////предедушие но с гласными(другими) буквами
end;
writeln(k);
end.