Запишите операторы ввода значений
следующих переменных:
а) А., А2, А3, А4;
б) х, у

program z1;

var i: integer;

a, x, f: real;

begin

writeln ('Программа вычисления функции f(x) = sin (2x) / sqrt (x)');

writeln ('При x, изменяющемя от 1 до 2 с шагом а');

writeln ('Введите шаг измениения функции (a>0)');

write ('a = ');

readln (a);

writeln ('i - номер строки');

writeln ('||');

writeln ('|       Таблица функции f(x) = sin (2x) / sqrt (x)       |');

writeln ('||');

writeln ('|    i    |      x     |      f      |     Значение      |');

writeln ('||');

i:=0;

x:=1;

repeat

i:=i+1;

f:=sin (2*x) / sqrt (x);

if f > 0 then writeln ('|',i:5,'    |    ',x:0:3,'   |    ',f:0:3,'    |   положительная   |') else

if f < 0 then writeln ('|',i:5,'    |    ',x:0:3,'   |    ',f:0:3,'   |   отрицательная   |') else

writeln ('|',i:5,'    |    ',x:0:3,'   |     ',f:0:3,'   |      равна 0     |');

writeln ('||');

x:=x+a;

until x > 2.0001

end.

Объяснение:

Программы будет выводит значение: положительная или отрицательная (а не неотрицательная, т.к. думаю, что там просто опечатка)

Программа допускает точность а до тысячных разрядов дробной части.

sin вычисляется в радианах

Рассмотрим ситуацию на примере:

Бабушка отправляет Вам письма с поздравлениями на каждый праздник уже не первый год. И вдруг Вы переехали на другой адрес и бабушке его не сказали. По сути, Вы удалили свой старый почтовый ящик (теперь тот ящик не Ваш), а бабушка не знает Ваш новый адрес.

При этом бабушка не аннигилирует, она будет дальше существовать на Земле и будет слать письма на старый адрес.

Так же и с аккаунтами. Когда Вы их регистрируете, Вы просто сообщаете сайту, как можно с Вами связаться, например, в случае восстановления пароля. После удаления почтового ящика аккаунт будет дальше работать, и сайт будет отправлять письма на старый адрес (если вы не привяжете новый ящик).

ответ: нет, аккаунты не удалятся