Помогите написать ординарную программку к этому заднию, безотлагательно, пожалуйста

Помогите написать простую программку к этому заднию, безотлагательно, пожалуйста

Задать свой вопрос
Лопандин Никита
если х>1 там выходит с параметром "а " выводить?
Семён
да
1 ответ
Var x:real;
begin
x:=-1;
while xlt;=5 do
begin
if xlt;1 write(sin(x):3:3,'  ');
if x=1 write (1,'  ');
if xgt;1 write ('a', cos(pi*x):3:3,' ');
x:=x+0.5;
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт