• помогите написать программы в pascal ABC (program,var,begin,end)

    question img

Ответы 3

  • спасибо большое,вы меня спасли
  • не за что
  • 1)uses crt;var y,x:integer;beginwriteln(x);y:=COS(x/2)-SIN(x);readln(y);end.2)uses crt;var a,y,x:integer;begina:=0;readln(x);a:=0,5*x+1;y:=0,5*sqr(a)+1,4*x-1;writeln(y);end.3)uses crt;var d,x:integer;beginwriteln(x);d:=(1/3)*x*49+(4/6)*x*108+(2/6)*x*80;readln(d);end.
    • Автор:

      mila51
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years