• Помогите пожалуйста, а так же нужно, чтобы все было на языке паскаль..
    пж-пж..

    question img

Ответы 1

  • 1)var a,b,c,d,k:real;  begin  read(a,b,c,d);    k:=(a+b+c+d)/4;  writeln(k);  end.2)var x,y,t:integer;beginread(x,y);t:=x;x:=y;y:=t;writeln(x,' ',y);end.3)var a,b,c,d:real;beginread(a,b,c);d:=b*b-4*a*c;writeln(d);end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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